


QL SOFTWARE 


Lowest U.K. prices 
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Blast off to the os 
Spring ZX Microfair -~ 
at the Horticultural 
Hall London SW1 on the 
10th May ’86. See for the first 
time at the show Sinclair's New 
128K Spectrum plus hardware add-ons and software. 

Explore those just launched interfaces, programs, 
hardware, magazines and books. Have a wonderful day out, see 
everything for Sinclair computers under one roof, just about all 
you ever wanted for your computer. 

Full support for 48K Spectrums and a Big QL Section. Users Clubs 
and experts will be on hand to answer your technical queries 
plus bring and buy stand for special bargains. Watch out for fantastic 
show prices with Big Big savings. 

For the show that’s out of this world come to the Spring Microfair. 


Send now for the reduced-price advance tickets on the coupon below. 


THE SPRING MICROFAIR 
May 1986 


EM 











Greycoat St/Elverton St, 
London SW1. 10am-6pm 


Admission: £1.75 (Adults) 


= Qe ; . 

LOR Fe ES £1.25 (Kids under 14 years) 
OK £5 as 2 |= 7 en 

ISP OE Zepincicey 


| SEND FOR REDUCED PRICE ADVANCE TICKETS TODAY 1 


Send to Mike Johnston (Organiser), Dept.2 ZX MICROFAIRS, 71 Park Lane, London N17 OHG. 
advance tickets 


Please send me 
(Child under 14 @ £1.00) 


Please send me advance tickets 


(Adult @ £1.25) 





Name: 
Address: 


Exhibitors ring 
Mike or Moira on 01-801 9172 for details of stand availability. 


BYTEBACK 


BUSINESS 

Impacct Sales Ledger 

Impacct Purchase Ledger £45.00 
Impacct Nominal Ledger £45.00 
Impacct Stock Control £45.00 
Impacct (complete) £170.00 


ARCADE GAMES 


ICE (complete) 

Supercharge 

Assembler Workbench 

Super Astrologer 

Super Sprite Gen. ............. £19.00 
Cartridge Doctor 


QSpell (Disc) 

Cash Trader 
Integrated Accounts 
Project Planner 
Entrepreneur 

Home Finance (Buzz) 


Knight Flight 


Lands Of Havoc 

BRAIN GAMES/SPORTS 
LANGUAGES 
Metacomco Assembler 
Metacomco C 
Metacomco Pascal 
Metacomco Lisp 
Metacomco BCPL 
Superforth 

QL Turtle Logo 


Nemesis 
Classic Adv./M. Quest 


Super Backgammon 
QL Othello 3D 
UTILITIES 

ICE (EPROM) 


Joystick Adaptor 

Quickshot II Joystick 

4 Microdrive Cartridges 
Transform Box + 20 Cartridges 


Miracle Expanderam 256 

Miracle Expanderam 512 

Miracle Centronics Interface 

QL Computer (Version 2.3 Software 


£39.00 
EIDERSOFT ‘MOUSE’ (including ICE EPROM, and ARTICE) £84.00 
% PHONE FOR SPECIAL ‘PART EXCHANGE’ DEAL! 
CITIZEN 120D PRINTER + MIRACLE CENTRONICS INTERFACE £230.00 


PLUS ALL LATEST SOFTWARE AND HARDWARE 
ALL PRICES INCLUDE VAT AND FIRST CLASS POST OR SECURICOR 
TELEPHONE (0636) 79097 FOR PERSONAL ASSISTANCE 
Send Cheque/P0 to: 


Wana: oe Qe 


NEWARK, NOTTS NG24 4UW 





FAST DELIVERY OF QL 
DISC DRIVES 


3.5” 1 Mbyte floppy disc drives, internal power supply, complete with 
disc interface, utilities, manual, and optional RAM. 











INTERFACE INGLE DUAL 
CANOE sate nestee tanto rcuaadiarnesnc ante ee etaaeieS £230 £310 
Delta plus parallel printer interface ................... £270 £350 
Delta plus 128K RAM + printer interface .......... £340 £420 
PGML luis: 256K FRAIM sc cctececetteecceesnsesevtesecorssces. ‘£380 £460 
Cumana plus 256K Expandaram ............::eeese £325 £405 


Cumana plus 512K Expandaram ............----:00+ 
BOX.GPION. OD DSEIONIISNS 6 oo Fecavacectecc conics capaeonasRentantaarendexesens 


TWO MICRODRIVE TOOLKITS 


Read and write microdive sectors from basic and assembly language 
programs. 

OGL MDV EXTENSIONS TOOLA IT .........0sccesicnssessocsacedeercaescoee. £9.99 
Adds six functions to Basic allowing read/write/verify of microdrive 
sectors, reading of medium names and “fingerprint” from sector 
headers, and includes a repeat format routine. An eight page manual 
explains the functions, details the microdrive format and uses 
example programs supplied on microdrive. 

QL MDV ASSEMBLY LANGUAGE TOOLKIT (Source Code) £29.99 
Over 1000 lines of fully commented assembly language source code 
to a set of routines equivalent to the above, but with some additions. 
An eight page manual explains microdrive format and how to 
implement a copy protection scheme as well as QDOS-like routine 
definitions. 

BOTH THE ABOVE TOOLKITS ON ONE MICRODRIVE ..... £34.99 


COMPWARE Also sell a wide range of QL peripherals (monitors/ 
printers/modems/EPROM programmers) and software. Please 
send SAE for full price list. 


PRICES INCLUDE VAT AND DELIVERY 
OVERSEAS CUSTOMERS — WRITE FOR EXPORT TERMS 


CNNELASS 57 REPTON DRIVE, HASLINGTON, 






























CREWE CW1 1SA 
Telephone: CREWE (0270) 582301 
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Roll Call 


The May 11 deadline for registration 
under the 1984 Data Protection Act is 
fast approaching. Under the Act, 
certain individuals and organisations 
who hold personal data on computer 
files must provide information for the 
Data Protection Register. 

There are a number of exemptions. 
For example if you keep details of your 
family finances on computer files it 
will not be necessary to register. On 
the other hand, if you use your QL to 
keep records of the local cricket club 
or residents’ association you will only 
be exempt if none of the members 
object to you keeping files on them. 

Because of the myriad uses to 
which home computers are put it is 
likely there are thousands of people 
unsure of whether they need to 
register. This, no doubt, is the reason 
why four books on the subject are 
supplied with the registration form. In 
typical official style three of them 
explain the Act itself and the biggest 
tells you how to fill in the form. 

Anyone who thinks they may be 
required to register should pick up a 
registration pack from the Post Office, 
or contact The Office of The Data 


Protection Registrar on 0625 535711. 


Q+ Disk Systems 


Eidersoft and PCML have announced 
anew range of disk systems based on 
PCML/NEC hardware and Eidersoft 
software. The systems are aimed at 
the professional QL user. 


A distinctive feature of the package 
is the inclusion of the new Eidersoft 
QL Mouse with co-ordinated software 
and the new NEC CMOS third height 
3.5in. disk drives, which, itis claimed, 
run quieter, cooler and more reliably 
than many 3.5in. drives. The disk 
systems are QL style and colour 
co-ordinated in black. 


There are two systems available, 
which are fully upgradable. The Q+ 
Disk System consists of a standard 
PCML disk interface with built in 
toolkit commands, twin 3.5in. third 
height NEC disk drives, QL Mouse and 
the Eidersoft software package, which 
consists of ICE, ARTice, a disk 
database, a jotter notepade, various 
conversion programs and a printer 
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QDOS for Supermicro 


Those of you waiting for Sir Clive to 
make his next Quantum Leap might 
benefit from taking a look sideways at 
what is happening elsewhere in the 
industry. Micro Concepts have just 
announced a new 6800 based 
machine which, according to them is 
going to be a close rival to the. 
Commodore Amiga. 

The most interesting feature of the 
Micro Box Ill is that one of its five 
operating systems — SMS2 — was 
written by QDOS author Tony Tebby. 
Indications are that it will run much of 
the software available for the QL. 

The machine is based around the 
Motorola 68010 microprocessor and 
the basic unit features a 2 Megabyte 
RAM. Initially the Micro Box II! will sell 
as a board system, but the company 
has plans to market it as a complete 
workstation. This will comprise 
processor box, colour monitor, 20Mb 
Winchester disc, twin 800K 314in. 
floppies, keyboard and mouse. It wil 
sell for around £2,000. As well as 
SMS2 the machine will run Tripos, 
GemDOS, OS9 68K and CPM 68K. 

Forget about WIMPS, Micro Box III 
has VROOMS — Virtual Raster Object 
Orientated Multidisplay System. 


spooler on disk. The Q+ Executive 
system is identical but has a 256K 
RAM disk interface and the CHOice 
multitasking software. A module is 
available to expand the Executive 





LR EER 


Instead of using windows to display 
multi-tasked jobs, each program is 
allocated a full screen. These can be 
flicked through to check on the 
progress of individual jobs. 


All in one Expansion 


Nottingham-based Micro Control 
systems has released a RAM 
expansion, disc and printer interface 
for the QL. The MCS expansion 
cartridge provides either 256K or 
512K of additional memory, 
Centronics parallel printer port and 
disc interface. 

The hardware is accompanied, for 


system to the full 640K RAM. Both 
systems come complete with a bound 
manual covering disk, mouse and 
software operation. 

The Q+ Disk System costs £399 





FARTS. 


Graphics are provided by a 
Motorola RMS chip which gives a 
screen resolution of 640 x 500 pixels. 
It has a stereo sound generator with 6 
oscillators and two envelope 
generators. 

There are plans to supply two 
upgrades, an 8Mb RAM expansion 
and the revolutionary INMOS 
transputer. Both of these should be 
available by the end of the year, by 
which time the cost of the chips 
should have dropped sufficiently to 
make it a viable option. 





a special introductory period, by a 
utilities ROM. In addition to RAM disc 
software it provides ‘non destructive 
windows’, which facilitate the use of 
pop-up menus from software. There 
is also a multi-tasking facility which 
enables the use of all four Psion 
packages concurrently, and a format 
utility. 

The cost of the unit is £199 for the 
206K version and £299 for the 512K. 


inc vat, the Q+ Executive System is 
£499 inc vat, and the Executive 

expansion module is £95 inc vat. The 
systems are available exclusively from 
Eidersoft mail order on 0708 851099. 
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Super Astrologer de luxe 


You don’t have to be C-C-C-Claudius to know the value of a good astrolo 
reading and personality delineation package. You need absolutely no knowle 
several professional astrologers have been stunned to discover. 
r for any birth-date or time, and any place on earth. Automatic personality comparisons can 
r lots of famous people, including Prince Charles, Princess Diana, Edison, Hitler, Rooseve 

The 58K machine-code program loads in 


er pushes the QL to its limit. It uses both microdrives and over 120K of data. 
es an amazingly detailed personality readout, spread over 4 single-spaced A4 pages, or on the screen. 


he definitive character 
— but itis not a toy as 





ger — and QL Super Astrologer is t 
dge of Astrology to use this system 













be performed — ideal for compatibility testing. Sample 
it, Queen Victoria, and Freud... 

under ten seconds and performs all calcula- 
Working astrologers can customise the text 









This excellent package can cate 
personality files are provided fo 










Super Astrolog 
tions quickly and precisely. It giv 
with the editor. 

Super Astrologer was de 
aspects, progressions, tr 
speed, with hosts of use 
_ the dust hasn't had time to settle on my printer since m 
strology program as this on any other home computer” 


We predicted that Super Astrologer would be a massive hit on the QL — and w 
AND/OR selection in the delineation files, and print-outs of the Natal Chart an 


Astrologer de luxe costs £24.95, with full instructions. 
———! 
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ooks on modern astrological technique. It handles the Natal chart, 
rologers. It does all the Ephemeris calculations at colossal 


lanetary distance calculator, etc., etc. 






rologer and a huge library of b 
ful tool for astronomers as well as ast 
s with variable magnification, interp 
_ itis accurate, comprehensive and easy to use.. 





signed by a professional astronomer, working with an ast 
ansits etc. Super Astrologer is very accurate and a power 


ful features including a scale display of planetary position 
y friends got wind of this program.. 
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SUPERCHARGE | 


Supercharge is a program that translates slow, interpreted SuperBASIC into fast, flexible 68008 machine 
code — totally automatically. You need no specialised knowledge at all. 


Supercharge supports the entire syntax of SuperBASIC. Compiled programs run incredibly fast; some run 
over 100 times faster than in the original SuperBASIC. Microdrive loading times are accelerated by a factor 
of up to 30. Multitasking is fully supported, and easy to use. 































* ALL Supercharged programs multi-task — you can run any * Supercharge is compatible with virtually all QL add-ons, in- 
number of them on one QL, simultaneously (RAM permit- cluding disk systems, expansion RAM, and even add-on 
ting) commands which do not form a standard part of Super- 

: . BASIC! ‘Toolkit’ utilities work beautifully, so long as they 

* Supercharge supports full floating point arithmetic, to an don’t try to modify interpreter data-structures (which ob- 
accuracy of NINE digits (SuperBASIC only displays seven viously aren’t there). Very few commands do this, and 
decimal places). Arithmetic is breathtakingly fast — integer Supercharge generates clear warnings where incom- 
handling is often 100 times faster than in interpreted patibilities might exist. 

BASIC. 


* Supercharge issues explicit, plain-English reports and warn- 
ings, showing the exact position of mistakes. Many ‘trivial’ 


* Supercharge allows the entire syntax of QL SuperBASIC: : 
errors are automatically corrected! 


file-handling, multi-dimensional arrays, local variables, pro- 
cedures and functions (with parameters), turtle graphics, 


windows, both display modes, all devices (including disk * Supercharge is fast, device-independent, concise and easy 
drives, modems etc.), sound, graphics, colour, strings, to use — it even compiled itself! 
etc., etc. 


* Supercharged programs may be interactively tested ‘in 


* Supercharged programs are reliable on all versions of the slow motion’ using the compatible SuperBASIC interpreter. 
QL. Most bugs and restrictions imposed by the SuperBASIC 
interpreter are corrected or lifted by the compiler. Say * Supercharged programs are protected against unauthorised 
goodbye to the integer FOR bug, string and integer SELECT modification, as they cannot be LISTed. Compiled code 
bugs, the CALL bug, the ‘tc@o many parameters’ bug, the loads incredibly fast — for instance, a 75K SuperBASIC 


GOSUB in a loop bug, the RESPR bug, etc., etc. program loads 25 times faster once compiled. 











*% Supercharge includes a sophisticated optimiser, which the * The 105 page Supercharge manual is comprehensive and 
user can direct to produce either especially compact or fast readable, with tutorial and reference sections, examples, 
68008 machine-code, on a line by line basis. hints and tips, and a full index and glossary. 







a 
5B AS [ C Cc oO mM he fi F Ee r ” Supercharge is a great improvement on SuperBASIC and has given me new faith in 
the QL”, T. Hansen, Norway. 
“/ was very surprised by the professional quality — it is really excellent", F. Moya, 


QL SUPERCHARGE is the most sophisticated BASIC compiler France. 




















ever published. It is the result of 18 months work by a dedicated "Invaluable... | think Supercharge is an excellent product, and the documentation 
team of programmers led by Simon Goodwin, a top software puts Sinclair to shame”, Dr K. Williams, Putney. 
designer and journalist. “The manual is very good. It inspires confidence and has a sense of humour. Super- 


charge itself is great”. H. Gupta, Northampton. 


The verdict from S rcharge users: 
eve fro ws ge The manual is a model of clarity, readability and accuracy: congratulations! The car on 


“Simple to use... an excellent product which coped completely with the vagiaries of the box should be a Rolls Royce”, M. Johnson, London. 
my own programming”, E. Cogswell, Havant. ” “Much more helpful than any previous manual / have ever read", Dr W. Fuggle, 
“Outstanding -— the most important piece of QL software so far”, Mike Walsh, Birmingham. 


see “Easy to use — very well written”, J. Hayes, Leeds. 


The verdict of Sinclair User (March 1986 issue) “A Sinclair User “Very Gay to se — verfimpressive”” Dr G.. Taylor, Harrow. 


classic” * x * x * 
The verdict of QL world incorporating QL user, (March 1986 issue): The arrival of this 





"Very impressed — should come as standard with the QL", A. Pritchard, Surrey. 


product is a significant event for the OL, | have no hesitation in recommending Super- " A credit to British enterprise”, Dr Helmut Aigner, Austria. 

ghetge: : : “Excellent!” — Colin Opie, McGraw Hill: W.D. Software, Jersey; A Dedman, Ipswich; 
The manual is very informative and easily read... supercharge is great! Better than | Dr Archer, Wakefield; C. Grogan, Huddersfield; G. Chew. Clwyd; K. Paul, Gerrards 

ever expected”, R Schubel, New Jersey, USA. Cross; A.B. Steen, Eastleigh, Ingenieurburo Neitzel, Detmold, W. Germany... and 

“May | say how pleased | am with Supercharge”, Richard Blake, London. many others. 

“| was impressed by the quality of the implementation and high degree of compatabil- 

Ry With Superior _f- Criber, Aachen. Germany: . : The latest version of Supercharge — version 1.17 — is available 

“Very high quality software... a very informative and useful manual”, Michael Gottlieb, as an upgrade price £10. to users who wish to get the very 

Edgware. ’ of 


“Very good and fast in use. You seem to deliver hwat you promise, unlike other QL most from their compiled ik 


suppliers, R. Coughian, Liverpool. 


Supercharge costs £59.95; this includes the compiler, code-generator, utility programs, add-on com- 
mands for task control and error-trapping, demonstration software and over 100 A4 pages of documenta- 


Disassembler when these programs are ordered at the same time as SUPERCHARGE. 





tion. £5 off SUPERFORTH, £5 off SUPERSPRITE and £2 off Super Monitor + 













a OFFER !! SUPERCHARGE + fCH £79.95 
ek s** SUPRRCHARG 





_ Software is compatible with ALL versic | 
ace a ‘sions of the QL, 
memory expansion and disk interface systems. 


Digital Precision software is | DEALERS: dis | 
digi : our discounts 
available from TBD, Lightning, generous — phone us now a 
Creative Sparks, and other 01-5275493. _ 
haa of good software. S 
uyers in Central London can PROGRAMMERS: We in 
ss . 3 ay : tend : | 
visit Micro-Anvika at 224 dominate the QL ee 
Tottenham Court Road. market, and we pay excellent 
Supercharge and Superforth  ‘"0Y@lties for good QL software. 
are availableon 5% inch 1449 Send us a disk or cartridge 


sector disk at no extra charge. ged tor a prompt, confidential 
: evaluation of work in progress. 
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hen one considers that the QL is not designed 

primarily as a graphics machine, each new 

package released to the market exhibits 
tantalising new aspects of the power of this superb 
micro. If present appearances are anything to go by, 
the excitement caused by new programs and 
peripherals for the QL is justifiable. 

Computer-assisted design, originally the exclusive 
realm of mainframes available to.only the largest of 
design offices, has become progressively more 
accessible to the smaller and no less needful technical 
illustrator. 

In common with many areas of endeavour, 
proficiency in a field usually can be equated with the 
years required to obtain a level of acceptable expertise. 
That is specially evident in the field of graphic arts, 
where an individual may be required to call on a wide 
range of knowledge to be able to produce a 
comprehensible graphical concept. 

Often viewed as an aid to error-checking, the 
computer also provides a system of creating artwork 
relevant to the requirements of the user and a 
mechanical medium for production of precision copies 
of drawings. Those features, coupled to the ease with 
which a drawing, be it of a technical or an artist nature, 
can be altered to suit particular requirements can 
scarcely be equalled. 

Large dedicated CAD systems are often limited to 
their design parameters; draughting as seen in the 
aircraft or automotive industry, for example, requires a 
range of operating systems, each with its own 
particular application, whether it be for electronic 
circuits, printed circuit boards, working drawings, 
exploring design concepts or analysing the complex 
inter-reaction of mechanically-related components. 

Evolution of the micro progressively has provided a 
cost-effective means of enticing the smaller drawing 
office into CAD applications. That, in turn, has 
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produced a snowball effect in the entire industry 
whereby computer manufacturers, programmers and 
end-users are finding that the smaller and more 
powerful machines are capable of providing 
sophisticated services denied even to some of the 
bigger systems. 

CAD has provided a means to designing 
commodities as widely diversified as optical systems, 
electronic products, aircraft, drugs and virtually any 
mechanical device imaginable. Integrated throughout 
the production processes, from concept to delivery, the 
computer often is directly involved in producing the 
more abstract concepts of promotion and other visual 
representations. 

The QL is proving its versatility in the entire and 
exacting field of graphic arts. At present there are eight 
major drawing packages available which provide the 
graphical artist with a means of producing a wide range 
of professional-quality drawings, whether they be for 
initial design or for illustrations to be included in 
audio-visual presentations. 

Each of the programs provides the user with 
powerful and exceptional drawing tools often 
characteristic of a specific package. It is for that reason 
that potential purchasers should take the time to study 
the features outlined at the end of this survey so as to 
acquire the package most suited to their requirements. 

It must be stressed, however, that because of their 
specialised applications, drawing programs in general, 
and CAD programs in particular, should be studied 
carefully and, almost without exception, require time 
for the user to acquire any degree of fluency with them. 

The first of the CAD-orientated packages in this 
survey is from Micr_A_Soft. Design Board Il, at 43K, 
can only be described as a versatile modular drawing. 
system in which the user can apply each of the 
methods of drawing, in turn, to a particular task. 

Undoubtedly the initial thrust of a generation of 
programs which can manipulate three-dimensional 
views of an object, Design Board Il is aimed at the artist 
orientated towards drawing to scale. The approach ° 
used throughout the program assumes a deliberately- 
placed “pen” at a required location on the “paper”. 
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Drawing Method 
Modes 
Colour range 
Menu 
Icons 
Help pages on screen 
Aids: Border reference 
Grid (on select) 
Cursor co-ord indicator 
Prompt Window 
Image Pan/Scroll 
Element Move/Reposition 
Image magnification 
Auto mirror image 
Pen direction indicator 
Drawing tools: 
Pen 
Width control 
Brush — sizes 
Airbrush 
Erase 
Auto fill—on select 
Command access 
Method of entry 
Cursor on screen 
Control 


Movement 
Turtle graphics 
Type 
Auto Colour Change 
Auto Geometrics 
Rubber banding 
Circle 
Ellipse 
Are 
Box 
Triangle 
Others 
Line: length 
width 
Element movement 
Element duplication 
Shadowing 
Text 
Colour 
Sizes — 
Positioning 
File Control 
Directory 
Load a screen 
Save ascreen 
Delete a file 
Format cartridge 
Printer Dump 
Area printed 
Demo pics supplied 
Ave. no. files/cart 
Principal application 
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DESIGN BOARD 
Micr_A_Soft 


Continuous, co-ordinate and plot 

4 only 

0 to 255 in mode 4 

Yes 

No 

No 

Yes; pixel reference border top and left side 
Yes; option of either or both of two 

No 

Yes 

Yes 

No; entire drawing may be repositioned using Pan/Scroll 
No 

Yes, individual elements in CAD mode 

Yes, angle indicator in main and CAD modes 


Yes; see special features 

Yes; In paint mode only 

3;0to2 

No 

No; On over-draw only 

Yes 

Command letters in prompt windows 
Keyboard 

In paint, text and banding modes 

By entering BAND mode and placing a point; 
By using the x and y co-ordinate locations; or 
By entering the pixel dimensions 

1 or 5 pixel increments in paint and text modes 
Yes; in main and paint modes 

Arrow in text mode; Block in paint mode 
No; requires over-drawing 

Yes; by dimensioning; 

No 

Yes—by positioning the centre point 
Yes—by positioning the centre point 

Yes —by plot and dimensioning 

Yes — positioned at lower left corner 

Yes — positioned at lower left corner 

Yes — Octagon, Pentagon and Hexagon; plan or oblique projection 
Plot, paint or continuous draw 

In paint mode 

No 

Yes; CAD mode duplication 

No 

Yes 

Full range (0 to 255 in mode 4) 

4 

Prior to text entry 

Yes 

Yes; to a printer 

Yes 

Yes 

Yes 

Yes 

Yes; special Eigen screen dump 
User-selected, using cursor wires 

No 

3; saved as ascreen dump 

Technical scale drawing 





QCAD 


Strong Computers £39.95 


Drawing Method 
Modes 
Colour range 
Menu 
Icons 
Help pages on screen 
Aids: Border reference 
Grid (on select) 
Cursor co-ord indicator 
Prompt Window 
Image Pan/Scroll 
Element Move/Reposition 
Image magnification 
Auto mirror image 
Pen direction indicator 
Drawing tools: 
Pen 
Width control 
Brush — sizes 
Airbrush 
Erase 
Auto fill — on select 
Command access 
Method of entry 
Cursor on screen 
Control 
Movement 
Turtle graphics 
Type 


Auto Colour Change 
Auto Geometrics 
Rubber banding 
Circle 
Ellipse 
Are 
Box 
Triangle 
Others 
Line: length 
width 
Element movement 
Element duplication 
Shadowing 
Text 
Colour 
Sizes 
Positioning 
File Control 
Directory 
Load a screen 
Save ascreen 
Delete a file 
Format a cartridge 
Printer Dump 
Area printed 
Demo pics supplied 
Ave. no. files/cart 
Principal application 
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Where freehand drawing of elements within a major 
component is required, four modes are available to the 
user. 

More than adequate draughting aids are provided in 
the form of grids, border co-ordinates, and a drawing 
angle indicator. Direct position addressing, in the form 
of pixel co-ordinates, is included in the operating 
system in all but the Paint modes. Prompts at each 
Stage in each of the modes are comprehensive, as are 
the position reminders when in the point-to-point — 
Banding — and CAD modes. Any of the 30 mode 4 
colours and stipples is available by entering the 
composite code required for either ink or paper modes. 

The Giro-Graphics and CAD modes require only 
height, width and depth dimensions of an object to be 
entered. Once completed, the position of the object — 
centre, in the case of a circle or ellipse; lower left 
corner, with angular objects — is entered, as 


prompted. 

Giro-graphics will then draw the dimensioned object 
in one of the standard shapes provided in the program; 
the CAD mode will require an additional entry from one 
of the cursor keys which will set the element at one of 
four positions, separated by 90 degrees and rotated 
round the lower left corner. 

Describing Design Board II as an interactive 3D 
graphics package is a fair assessment. The user can 
manipulate elements of a drawing on the basis of either 
point or plane rotation. Examples of this can be seen in 
the illustrations. 

With a powerful drawing tool of this nature, one 
might ask what compromises have been made in the 
program. Micr_A_Soft has provided the user with an 
open-ended program in that it must be used 
intelligently. 

It is possible, with very complex drawings which 


Continuous or plot 

Mode 4 only 

White or green drawing; red grid 

Yes 

No 

No 

No 

Line or dot; not independent of drawing 
Yes 

Yes 

No 

Yes; from components held in the array 
No 


Command letters in prompt windows 
Keyboard 

1 

Cursor keys; continuous or point plot 
lor 5 pixel increments 

Yes 

‘+’ for drawing; ‘-’ for plot; ‘,.’ for erase; 
‘0’ for ‘Join Dots’ (points) mode 

No 

Yes 


Plot or turtle graphics 

Not applicable 

See special features 

Yes; up to 20 symbols held in an array 

No 

Yes 

White or green 

3 

On screen, after input 

Yes 

No 

Yes; screen or symbols 

Yes; screen or symbols 

No 

No 

Yes; Miracle Systems 

Whole of drawing area; with or without borders 
1; See special features 

3 

Any technical drawing incorporating symbols. 


As supplied, for drawing electronic circuits 





PAINT MASTER 
Shadow Games £24.95 


Drawing Method 
Modes 
Colour range 
Menu 
Icons 
Help pages on screen 
Aids: Border reference 
Grid (on select) 
Cursor co-ord indicator 
Prompt Window 
Image Pan/Scroll 
Element Move/Reposition 
Image magnification 
Auto mirror image 
Pen direction indicator 
Drawing tools: 
Pen 
Width control 
Brush — sizes 
Airbrush 
Erase 
Auto fill — on select 
Command access 
Method of entry 
Cursor on screen 
Control 
Movement 
Turtle graphics 
Type 
Auto Colour Change 
Auto Geometrics 
Rubber banding 
Circle 
Ellipse 
Arc 
Box 
Triangle 
Others 
Line: length 
width 
Element movement 
Element duplication 
Shadowing 
Text 
Colour 
Sizes 
Positioning 
File Control 
Directory 
Load a screen 
Save ascreen 
Delete a file 
Format a cartridge 
Printer Dump 
Area printed 
Demo pics supplied 
Ave. no. files/cart 
Principal application 


Position or plot 

4 or 8 (switchable within program) 
0 to 255 

Yes 

No 

No 

Yes 

Yes; independent of drawing 

Yes 

Yes 

No 

Yes; in either of two modes 

Yes 

Yes, in any of four directions; relocate option 
No 


Yes 

Yes; 4 stages 

Yes, size is infinitely variable 

Yes 

Successively deletes previous entries 

Yes 

Window 

Key select 

2, at all times 

Alternate by toggling; independent or linked 
Continuous 

Yes, in paint mode 

‘+’? on AH & JM. ;‘@’ on JS 

Yes, in user-selected stages 

Yes 

Yes 

Yes; locate centre position 

Yes; rotatable axis; infinite eccentricity 
Yes; 180° phase control 

Yes; determined by relative cursor positions 
Yes; 4 pre-defined; 1-with rubber banding 
No 

Yes 

Yes 

No 

Using step-and-repeat ‘Position’ option 

No 

Yes 

0to7;0to4 

0,0 to3,1 

Directly on screen before pressing <ENTER> 
Yes 

No 

Yes 

Yes 

Yes 

No 

No 

2 

30 to 60 

Illustrating Adventure games, picture source 
program for inclusion in other programs and 
general graphics package 
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incorporate all of Design Board features — especially 
those involving Image Designer, producing inward or 
outward spirographics — to run out of memory on an 
unexpanded QL. It is also possible to run out of memory 
when drawing occurs in a haphazard fashion, such as 
completing part of a drawing and then erasing by 
entering a new paper colour command and starting 
again without re-starting the program. 

Provision is made for recovering from that condition, 
enabling a drawing to be saved to Microdrive. The 
condition, however arising, can be prevented only by 
considered planning before drawing starts. Had 
Micr_A_Soft opted for incorporating limitations on the 
range of drawing features, much of its effectiveness 


would have been lost. 


Of special interest to technical illustrators is the 
Specially- commissioned Eigen screen dump. Printing 
the entire colour range as differential dot patterns 


vertically in the printer, distortion is minimal and occurs 
in a slight compression of the vertical element of the 
picture. The dump, which includes selective screen 
areas to be printed, makes provision for printing two 
full screens on an A4 sheet of paper. 

Available from Strong Computers, the second 
program, QCAD is a specialised package for artists 
who require drawings involving glyph notation. 
Probably the most specialised of the graphics 
packages in this survey, QCAD is supplied with a 
comprehensive library of 97 standard electronic 
symbols and includes capacitors, op amps, diodes, 
transformers and a range of IC pin-outs in a variety of 
package types. Some of them are duplicated because 
of a requirement for either orientation or component 
polarity. 

Enhancing the versatility of the package, QCOMP, a 
separate routine, is included for producing libraries of 
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ART MASTER 
Micr_A_Soft £12.95 


Drawing Method 
Modes 
Colour range 
Menu 
Icons 
Help pages on screen 
Aids: Border reference 
Grid (on select) 
Cursor co-ord indicator 
Prompt Window 
Image Pan/Scroll 
Element Move/Reposition 
Image magnification 
Auto mirror image 
Pen direction indicator 
Drawing tools: 
Pen 
Width control 
Brush — sizes 
Airbrush 
Erase 
Auto fill—on select 
Command access 
Method of entry 
Cursor on screen 
Control 
Movement 
Turtle graphics 
Type 
Auto Colour Change 
Auto Geometrics 
Rubber banding 
Circle 
Ellipse 
Are 
Box 
Triangle 
Others 
Line: length 
width 
Element movement 
Element duplication 
Shadowing 
Text 
Colour 
Sizes 
Positioning 
File Control 
Directory 
Load a screen 
Save ascreen 
Delete a file 
Format a cartridge 
Printer Dump 
Area printed 
Demo pics supplied 
Ave. no. files/cart 
Principal application 


MAXIM 


INTEC — price to be announced 


Continuous, Co-ordinate or plot Drawing Method Continuous 
Mode 8 only Modes 4 only 
0 to 255 Colour range White, red, black or green only 
Menu No 
Icons Yes; 2 pull-up windows 
Help pages on screen No 
Aids: Border reference No 
2; must be laid on before drawing Grid (on select) No 
No Cursor co-ord indicator No 
Yes Prompt Window Yes 
Image Pan/Scroll No 
Element Move/Reposition Yes; cut-and-paste method 
Image magnification No 
Auto mirror image No 
Pen direction indicator No 
Drawing tools: 
Yes; points are entered by BANDING command Pen Yes 
Yes; in paint mode Width control Yes; 4 widths available 
Yes; 3 sizes available Brush — sizes Yes; 4sizes available 
No Airbrush Yes 
No; must be over-drawn with required colour Erase Yes 
Yes Auto fill — on select Yes 
Command letters Command access Utilising icon selection 
Keyboard Method of entry Cursor keys and space bar or joystick/fire button 
In paint mode only Cursor on screen 1; arrow to locate drawing position; drawing tool 
By entering BAND mode and placing a POINT to produce lines 
1 or 5 pixel increments in paint mode Control Cursor keys/space bar or joystick/fire button 
Yes Movement Single pixel increments 
Block, in paint mode Turtle graphics Yes 
No; requires over-drawing Type Drawing tool symbol 
Yes, by dimensioning Auto Colour Change No; must be over-drawn 
No Auto Geometrics Yes 
Yes — by positioning the centre point Rubber banding Yes 
Yes — by positioning the centre point Circle Yes 
Yes — by plot and dimensioning Ellipse No 
Yes — positioned at lower left corner Are Yes 
Yes — positioned at lower left corner Box No 
Triangle No 
Plot or paint Others No 
In paint mode Line: length Infinite or rubber-banded 
No width 4 standard widths available 
No Element movement No 
No Element duplication Yes 
No Shadowing No 
a Text Yes 
— Colour In any one of the four colours available 
— Sizes One size only 
Yes Positioning 3 stage; infinite text-cursor 
No File Control Yes 
Yes Directory No 
Yes Load a screen Yes 
No Save a screen Yes 
No Delete a file No 
Yes; special Eigen screen dump Format a cartridge No 
User selected using cursor wires Printer Dump Yes 
No Area printed Entire screen 
3 Demo pics supplied No 
General artist package utilising optional scale Ave. no. files/cart - 3 
drawing techniques Principal application Making high-resolution drawings to be reproduced 
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on a printer for general document illustration 
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QL PAINT 


Sinclair Research 


Drawing Method 
Modes 
Colour range 
Menu 
Icons 
Help pages on screen 
Aids: Border reference 
Grid (on select) 
Cursor co-ord indicator 
Prompt Window 
Image Pan/Scroll 
Element Move/Reposition 
Image magnification 
Auto mirror image 
Pen direction indicator 
Drawing tools: 
Pen 
Width control 
Brush — sizes 
Airbrush 
Erase 
Auto fill —on select 
Command access 
Method of entry 
Cursor on screen 
Control 
Movement 


Turtle graphics 
Type 
Auto Colour Change 
Auto Geometrics 
Rubber banding 
Circle 


Ellipse 

Arc 

Box 

Triangle 

Others 

Line: length 

width 

Element movement 

Element duplication 

Shadowing 
Text 

Colour 

Sizes 

Positioning 
File Control 

Directory 

Load a screen 

Save ascreen 

Delete a file 

Format a cartridge 
Printer Dump 

Area printed 
Demo pics supplied 
Ave. no. files/cart 
Principal application 





symbols used in other areas of specialised draughting 
by writing a string into a SuperBasic procedure. 
Applications of QCAD include such diversified fields as 
field archeology, communications, flowcharts, 
plumbing, heating, pneumatics, mechanical and 
electrical engineering. 

Providing the draughtsman with a powerful tool, the 
QCAD operating system enables the user to place up to 
20 repeatedly-used symbols into an addressable array. 
Less-frequently-used symbols are addressed by their 
“catalogue” number, whereupon they are drawn at the 
current cursor position. 

sensibly, QCAD is limited to either green or white 
ink; draughtsmen are usually limited to black. The 
features included on screen are logical, sequential and 
enormously helpful. The Micracle Systems screen 


Continuous or plot 
Mode 8 only 
0 to 7 plus stipples and textures 


No 


Yes 


No 
No 
No 


Optional 


No 
No 


Yes 


Yes; 16 times 
Yes; vertically, horizontally or 180° rotate 


No 


Yes; may be defined as colour or texture 


Yes 


No 


Yes; realistic splatter effect 

No; must be over-drawn with required colour 
Yes; 2-stage 

Two-letter typed code or Icons 

Keyboard or joystick (the latter with icons only) 
1; variable size 

Cursor keys or joystick 

Continuous; single pixel increments 


Yes 


3 types; optional cursor colour change 


No 
Yes 
Yes 
Yes 
Yes 
No 


Yes; from a single point at cursor position 


No 
No 


Yes; may be defined as colour or texture 


Yes 
Yes 
Yes 
No 


Yes and underlining facility 


0to7 


2 


Directly on screen before pressing <ENTER> 


Yes 
Yes 
Yes 
Yes 
Yes 
No 


Yes; can be user-modified for particular applications 
Entire screen 


3 
3 


Comprehensive artist package 





dump supplied with QCAD produces the least 
horizontal to vertical aspect ratio distortion of the 
packages in this survey. 

A massive 56K program, Paint Master, available 
from Shadow Games, is applicable in areas where a 
large number of illustrations are required to be 
included in a user’s SuperBasic programs. Illustrations 
made with Paint Master are saved as a group of 
co-ordinates, as opposed to the more usual screen 
dump files; between 30 to 60 pictures, depending on 
their complexity, can be contained on one cartridge. 

Intended originally to be used by authors of text 
games for adding a greater degree of player 
involvement, Paint Master is supplied with a set of 
useful programs which will convert a drawing into a 
form usable by SuperBasic commands. Users can 
select either four or eight colour modes from within the 
program and the drawing board contains the full range 
of drawing aids and prompts. A full-colour palette is 
available by either basic colour selection or by the use 
of the superb stipple generator. 

Two features exceptional to Paint Master are the use 
of two cursors which can be used individually — and 
toggled — or can be linked; the second feature 
provides a useful method of duplicating specific 
drawing elements within an overall drawing and at 
different scales and positions. Erasing occurs by 
deleting drawing segment entries successively. 

Art Master, from Micr_A_Soft, is a mode 8 only 
general artists’ program. Derived from Design Board, 
Art Master can be used in either continuous drawing or 
plotting modes. Either way, sketches made on graph 
paper convert readily to the screen by using the 
features found in the package. 

Of special interest to those producing abstract 
illustrations for use as backgrounds for the primary 
drawing or as computer art, screen slides of which can 
be included in audio-visual presentations, one Art 
Master mode, Image Designer, requires the user to 
enter a sequence of co-ordinates. The automatically- 
produced drawing Is reminiscent of a cross between 
drawing with fractals and spirograph. 

In common with Design Board, Art Master uses the 
Eigen screen dump and differs not only in that it 
provides a single, full-page printout from a complete 
screen but also makes provision for selective printing 
by the replacement of on-screen cursor wires. 

A newcomer to the graphics scene, the Intec Maxim 
draws in mode 4 only and all commands are entered by 
use of the space bar or joystick ‘fire’ button. Because 
of its presentation of an uncluttered screen, Maxim's 
feature-packed options are not immediately apparent 
until full use of the program is made. When loading is 
completed, all the user sees is a white drawing area, at 
the bottom of which is a single, screen-wide prompt 
window. To the right in that window is a colour name 
— default of black — a pencil symbol and a line-width 
reminder — 1, on default. 

The left end of the window contains two words, 
Options and Options II. Only when the cursor is moved 
to the Options window and the space-bar is clicked 
does the care and attention to detail in the program 
become immediately apparent. 
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Best-described as a user-friendly program, two 
pull-up icon menus are provided by either of the Option 
selects which enable the user to enter the command 
modes for drawing tool, colour, line widths, text, auto 
fill, cut-and-paste and file control. 

Once the required options are selected, the icon 
menu drops back off-screen and the arrow cursor can 
be moved back to the area required. Clicking the 
space-bar changes the cursor into the symbol of the 
drawing tool selected — pencil, airbrush, eraser or 
paintbrush. Text can be moved round in a similar 
manner, where it is ‘fixed’ by pressing the space bar 
again. 

What can anyone say about QL Paint? Similar in 
most respects to the Talent GraphiQL, from which it is 
derived, except for the inclusion of icon pull-down 
menus, the program contains sufficient features to fill 
many articles about drawing; the documentation fill 
124 pages. 

Virtually every conceivable option is available to the 
illustrator for producing professional-quality pictures, 
rivalling, and in many cases surpassing, programs 
available only on more expensive computers and 
costing considerably more. 

Drawing in mode 8 only, QL Paint draws in one of 
two modes — the JAM mode, where over-writing 
occurs in true colour representation, or XOR mode, 
where over-writing occurs in an alternative colour not 
common to either of the two original colours. 

One of the many options included is a facility for 
producing either solid colours or drawing either in one 
of the supplied textures or user-defined textures. Either 
mode can be performed with a solid or multi-coloured 
pen, or a solid or multi-coloured fill command. Virtually 
any combination of drawing techniques may be 
employed to complete a finished drawing. 

Of special note is the superb documentation. 
Supplied in a loose-leaf binder, the instructions cover 
all of the aspects of the program in great and careful 
detail. A section of the handbook covers general 
information for illustrators using computer drawing 
more effectively. 

Last, but certainly not least, is the Psion QDraw. 
While a real drawing package in its own right, QDraw 
realises its greatest potential as a drawing toolkit. That 
is not surprising because it owes its origins to an 
in-house designing aid. 

Line widths are continuously variable and drawing is 
performed almost entirely using single-key entry. In 
use, the utilisation of turtle graphic commands like 
<F1>/<F2> for pen up/down becomes readily 
apparent. QDraw has the facility for dropping coloured 
shadows or ‘performing what can only be described as 
sliding one drawing beneath another. 

Other features included are two-stage 
magnification, selective colour-changing, saving small 
sections of a drawing for building a library of useful 
shapes, duplicating elements of a drawing, mirroring 
and moving entire sections of a drawing. 

One point worth remembering is that any drawing 
Saved as a screen dump can, with most of the programs 
included in this survey, be loaded into each other for 
addition or modification utilising program features 
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perhaps not found in the originating program. 

What of the future? Current editions of the programs 
will almost certainly evolve. New releases will reflect 
the interest shown by professional artists and 
designers who, with the aid of programmers fluent in 
68000 code, will bring their expertise to the fore. 

It is possible that the QL will never be able to 
produce true three-dimensional modelling. It is 
possible that three-dimensional rotation or 
manipulation as seen on computers relying on almost 
unlimited memory may never become a reality; but the 
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operative word is possible. 


QDRAW 
Psion £14.95 






Drawing Method Continuous 
Modes 4 or 8; pre-selected before loading 
Colour range 0,2,4and7;0to7 
Menu Yes 
Icons No 
Help pages on screen Comprehensive 
Aids: Border reference No 
Grid (on select) Mode 4 only; independent of drawing 
Cursor co-ord indicator No — 
Prompt Window No; overprinted on background as required 
Image Pan/Scroll No 
Element Move/Reposition Yes 
Image magnification Yes; 8 times and 16 times 
Auto mirror image Vertically through centre; left side onto right 
Pen direction indicator No 
Drawing tools: 
Pen Yes 
Width control Yes; infinitely variable 
Brush — sizes No 
Airbrush No 
Erase No; must be over-drawn with required colour 
Auto fill — on select Yes 
Command access Command letters 
Method of entry Keyboard 
Cursor on screen 1 
Control One of 8 letter keys or cursor keys 
Movement lor 5 pixel increments 
Turtle graphics Yes 
Type ‘+’ continuous or flashing, ‘-’ or cross-wires 
Auto Colour Change Yes 
Auto Geometrics No 
Rubber banding Lines only; cursor can be switched from one end of a line to the other 
Circle No 
Ellipse No 
Arc No 
Box No 
Triangle No 
Others No 
Line: length Yes 
width Yes; by utilising the cursor-expand feature 
Element movement Yes 
Element duplication Yes 
Shadowing Yes 
Text No 
Colour — 
Sizes — 
Positioning — 
File Control Yes 
Directory Yes 
Load a screen Yes 
Save a screen Yes 
Delete a file Yes 
Printer Dump Yes; negative screen dump (black prints as white) 
Area printed Entire screen 
Demo pics supplied Yes; composite screen of useful shapes 
Ave. no. files/cart 
Principal application General drawing package; Artist toolkit 
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1) 


Printer Question 


Iam using a QL for business with 
some degree of success and have 
written several programs to produce 
works orders, sales records and 
related documents such as standard 
letters and invoices. I now need to 
design various items on-screen and 
dump to printer. The printer is 
Taxan/Kaga KP-810. Can you please 
tell me if it is possible to obtain a 
screen dump routine and incorporate 





it into existing programs. 
P. E. Thurlow, 
Poole, Dorset. 





.., And Answer 


In need of a program for a screen dump, I 
wrote my own. Although it worked well 
enough, it took so long to print that I was 
afraid my printer would become obsolete 
before it was complete. 

it then occurred to me that perhaps | 
could make use of the screen dump 
program included on the Easel 
Microdrive. A little investigation revealed 
the existence of a machine code program 
called GPRINT_PRT which can be loaded 
and used via the “LBYTES” command. That 
has proved very successful, and I include a 
listing which works well with my Epson 
RX80/FT printer. Some points to note: 

The area of the screen printed-out 
includes part of the normal command 
area, SO it is wise to adjust the windows of 
the default and command screens as 
shown. 

The file GPRINT_PRT can be copied 
from the Easel cartridge to any Microdrive 
cartridge via the normal COPY command, 
e.g., COPY mdvl_GPRINT_PRT to 
mdv2_GPRINT_PRT. 

The printer serial port must be closed 
before use. 

The CLEAR command must be used first 
if the screen dump is part of another 
SuperBasic Program. In that case it is also 
necessary to find the number allocated to 
“scrnprt” — e.g., by print scrnprt in a test 
program — and using it directly in the 
CALL statement. 

This operation will convert the printer 
to Yin. line spacing and it must afterwards 
be reverted to normal spacing by a 


separate command. 
Robin Pitcher, 
Dinas Powis, 
S. Glamorgan. 
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100 REMark SCREEN DUMP 
PROGRAMME 

110 CLEAR 

120 scrnprt=RESPR(1312) 

130 LBYTES mdv1_gprint_pri,scrnprt 

140 WINDOW 448,230,32,10 

150 WINDOW #0,4468,15,32,240 

160 WINDOW #2,448,230,32,10 

170 CALL scrnprt 


Advanced Driver 


In reply to the letter headed Print 
Problems in the March, 1986 issue. There 
is a simple way of changing the printer 
driver on Easel. The problem is that 
people let themselves be governed by the 
system. First define your objective, then 
see if you can first work outside the 
parameters set down in the manual, I did 
and it saves so much head-banging. 

Load the file (printer_dat) by the use of 
LBYTES to the beginning of screen 131072, 
then do a hard copy of the first 500 
locations using PEEK , PRINT and! to space 
it sensibly. 

You then have a copy of the code 
involved in decimal; just circle all the 
number 27s (ESC), the command codes to 
the printer. The one or two numbers 
which follow the 27 tell the printer to 
switch to a mode etc. Write them and 
compare them to your printer manual. 

Some will mean nothing but you can bet 
that most will. For instance, I have a 
Smith-Corona d100 which, unlike the 
FX80, thinks that 27 65 8 or Esc A8 means 
set the line space to 82in. Hence the gaps 
in the graphs. So count the bytes on the 
paper, poke 4 into the correct place, do a 
hard copy to check, work out where the 
file ends on the screen — look for 
recurring number pattern. Then SBYTES it 
in place of the original. 

The program is only 10 or so lines using 
a loop. I also think it might help people 
overcome their system-induced tunnel 
vision if they write their own routine. My 
apologies to anyone I may have offended 
but anger is a powerful motivator. 

Hugh Spencer, 
Halstead, 


100 OPEN #3,ser1 Essex. 


110 Cs 

120 LBYTES mdv1_printer_dat,131072 
130 FORa=1T0O 500 STEP 1 

140 S$=131071+a 

150 p= PEEK(s) 

160 PRINT #3,p,! 

170 END FORa 





Pass the Source 


I received from you on Microdrive 
Exchange the DIY assembler which I 
assumed would allow me to type-in the 
various machine code programs which 
have appeared in QL User. Wrong! It seems 
that before I can use the assembler I must 
first prepare a source program. What is a 
source program, why is it needed and, 
more important, how do I prepare it? The 
instructions say that it should be prepared 
using Quill. I do not understand, Can you 
please enlighten a novice such as myself? 

I do not want particularly to program in 
machine code — only to have the ability to 
type-in published programs. 

G. Boxer, 

Tintagel, 

Cornwall. 
Editor's reply: It would be an extremely 
laborious process to write a program in 
machine code which is simply a sequence 
of binary numbers. Instead, programs are 
written in assembly language and this 
source code is compiled into machine 
code by an assembler program, like the 
one available from the Microdrive 
Exchange. 

The machine code program in Sinclair 
QL World are mostly in the form of 
assembly listings i.e., source code. The DIY 
assembler uses Quill as it’s editor. Using 
Quill, you must type in the listing and save 
it to microdrive in the usual fashion. Then 
load and run the DIY assembler, which will 
ask for the name of a source file to be 
assembled — the file you have created with 
Quill. 

When the assembly is complete the 
program will indicate any errors and you 
should correct them in the original source 
file, again using Quill. Once an error-free 
assembly is obtained, the machine code 
can be saved to a separate microdrive file. 





CAD In Perspective 


Best wishes on the new combined 
publication. [ am an architect in private 
practice and I bought my QL in August, 
1984. 1am using my unexpanded QL 
successfully with a Microvitec monitor, 
Epson RX 80 F/T printer and Microdrive 
storage only, 

I use Quill for letters, standard forms 
and reports; Archive is used to store 
information on all previous and current 
projects; Abacus is invaluable for all kinds 





of calculations from complex sewer 
systems — very glamorous — to fee 
accounts and structural calculations; while 
easel has been used to give a graphic 
comparison of tender figures for projects. 

One thing I discovered quickly is that, 
while I enjoy tinkering with SuperBasic, 
what I really want is well-written software 
which I simply load and use to do work. 
The Psion package has improved the speed 
and presentation of many aspects of my 
work. 

What would really fulfil my dreams 
would be a program which would project 
simple perspectives from which 
presentation drawings could be prepared. 
When I saw the preview in your 
January/February issue which held out the 
promise of information on computer 
design packages I could scarcely wait for 
January 21. When it did not arrive | 
consoled myself with the thought that 
computer journalists must need more than 
the usual amount of time to recover from 
Christmas and New Year parties, but at 
least 1 would get the gen on my beloved 
design package in February. Wrong! 

Could you tell me whether anyone is 
working on a program to produce 3D 
perspective projections? The other types of 
computer drafing programs like QDraw 
seem more geared to those who want to 
create screen pictures for inclusion in 
games or business software. That is almost 
useless inthe type of application I require. 
I am not looking for an Acropolis or 
Rucaps type system, but even a simple 
program could be very useful. 

John McKevitt, 
Newry. 
Editor's reply: It was not a hangover which 
delayed us, just that it takes time to 
produce a trule comprehensive guide, 
which you will find starting on page 7. 


Never Too Old 


I am one of those persons who could be 
classed as too old — at 66 — to learn 
computing, so I set out before Christmas to 
see what the market had to offer, my 
enthusiasm being sparked by the new 
Amstrad word processor being advertised. 
You will be pleased to know I settled for 
the QL. I must admit learning 
programming will be a little daunting, as 
machine code and SuperBasic do not 
mean very much to me. 

Journalism is my hobby now that I have 
retired from travel. As a word processor I 
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thought perhaps a computer could be of 
use to me in the creation of stories and 
articles which I could store and retrieve at 
will. When I began to make enquiries I was 
amazed at the wide range of computers on 
the market and how little the sales people 
knew about the technical side of what they 
were selling. So I started by looking on the 
newstands at the user magazines, which 
seemed always to be monopolised by 
students all having a good read on the 
cheap. That put me on the right track. 

The QL won my vote on price and its 
capability. I thought, rightly as:it has 
proved, that it would give me a good 
computer as well as a word processor. I 
also hoped to be able to get some French 
and Spanish language programs but so far 
I have had no success. For a monitor I 
selected a 14in. Sony with RGB on the front 
which I can use as a television set if I wish, 
and it is good in either mode, F1-or F2. 


Getting to grips with the manual at first 
was a little difficult. With the help of QZ 
User and experiences of some of your 
readers I was able to understand 
eventually some of the technicalities. A 
little practice and I got the thing working 
after getting locked up and locked out and 
some bad names during the first two 
weeks, 


After that it was easy. I finally mastered 
Quill. The next stage was to buy a printer. 
The prices and range wasa little off-putting 
but QL User came to the rescue once more 
and I purchased a Centronics GLP. It has 
lived up to its word. 

The installation was not so easy. At first, 
no matter what I did, the printer would not 
work until I realised that baud rate and dip 
switches had to be understood. The 
December issue of the QL User had a letter 
init from G. Slater, who described the dip 
switch settings and put me on track. Even 
then nothing worked at first, which made 
me suspicious of the QL serial lead but the 
trouble became evident to me after I spent 
some time trying to make something of the 
16 dip switches and found that I had the 
serial lead switch in the OFF position. 

After that I had notrouble. Installing the 
printer had me guessing for a time and 
sometimes the printer would print one 
line over another halfway through a 
document. That I overcame by advancing 
the line feed before printing. Once or 
twice I have lost documents in memory 
and from the Microdrive, never really 
knowing how, but as time passes that does 
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not happen so much, as I have learned to 
forstall it, hence the good advice of making 
back-ups of important documents. 

Having saved about 50 documents on 
four Microdrives, deleted, edited and 
reorganised my files, I would like to say 
how delighted I am with the performance 
of both the QL and the GLP. The QL does 
some strange things when I am editing a 
long document, such as breaking-up and 
refusing to re-line again and overloading 
the memory, but now that I have had a 
considerable amount of practice it 
produces superb results. 

I had difficulties in obtaining new 
ribbons, as no-one seemed to stock them. I 
telephoned some of the advertisers in 
Sinclair QL World and was quoted £7.95. 
Dixons got me some for £3.49. 

Although I am well-satisfied with the 
package I have put together, my only 
criticism is of the sloppy QL keyboard. Sir 
Clive Sinclair has a winner in the computer 
field, if only the keyboard worked as 
smoothly as some I have tried. The small 
Microdrives hold a good deal more than 
people realise. On balance, if it goes on 
giving me good service, Iam more than 
satisfied, but ifan improved keyboard 
QL is marketed I shall certainly choose it. 

W. E. G. Brockman, 
Whitstable, 
Kent. 


Screen Switch 


I have programmed in machine code 
almost seven months since I bought my 
Metacomco assembler and now I have 
some problems. I have tried unsuccessfully 
to find answers to my problems from my 
machine code books and from my QL User 
magazines. 

Is there any way to turn off the screen, so 
if] write something to the screen memory 
it does not affect the TV or monitor screen 
until the screen is turned on again? I know 
that I can write a machine code program to 
do that but with my talents it would be too 
slow. 

Then I want to know if it is possible to 
move the QL second screen from the 
system variables to the free RAM so that I 
can use it. 

Mikael Honkala, 

Loviisa, 

Finland. 

Editor sreply: Bit 0 of the master chip status 
register at $18063 controls the screen. Set 





this to 1 to blank the display and 0 to 
re-enable it; setting bit seven of the same 
address switches the screen to it’s second 
location on top of the system variables, It is 
not possible to move it, and it can 
therefore be used only in supervisor mode. 


University Archives 





Sandwich degree courses which 
incorporate periods of industrial training 
in addition to the students’ academic 
studies hold many advantages for students 
and employers alike. In these days of 
unprecedented levels of unemployment, 
the procurement of training places is a 
major problem for many educational 
establishments. In the Department of 
Mathematics and Computer Studies at 
Dundee College of Technology a new 
computerised system using the QL has 
been developed to assist the placement 
officers. 

User-friendly software has been written 
using Archive procedures to enable the 
system to be used with ease. A company 
database has been developed, with each 
record containing 36 fields, so that 
relevant information about present and 
potential employers may be maintained. 
An attractive screen display for each record 
has been obtained using SEDIT, so I can 
assure Keith Tearle that 32 fields per 
record is not too many for Archive. 

Separate student files are maintained 
and each record contains the student's 
name, home and term address, and 
vacancies applied for. Cross-reference 
between comnpany and student files is 
obtained by using a company code 
variable. Extensive use has been made of 
the SEDIT facility and operation of the 
system generally involves the selection ofa 
particular option from a displayed menu. 

The system has three main uses. The first 
is the day-to-day data management used to 
examine, alter or insert information into 
the company or students’ databases. The 
second use is the production of a number 
of standard reports, which enables an 
instant anlaysis of present or past 
placement information to be obtained. 

Before the introduction of the 
computerised system, any analysis of the 
data needed laborious sifting through a 
variety of card index boxes; consequently 
reports were produced only on a yearly 
basis, so no accurate information was 








readily available ai interim points in time. 

The third use is the production of a 
number of standard letters and address 
lables. The controlling procedures insert 
the information regarding the company 
contact and address into the appropriate 
standard letter, with a cut-sheet feeder 
used for continuous production. 
Previously, standard letters were 
duplicated in bulk and the departmental 
typists inserted names and addresses. That 
was very time-consuming and 
unfortunately the typed name and address 
contrasted sharply with the duplicated part 
of the letter. 

Our system was developed using a 
standard QL but I do not believe that 
Microdrives are suitable for very heavy use 
and the dreaded bad or changed medium 
message occurs too often for complete 
confidence. I maintain three back-ups but 
have decided to use disc drives and am 
eagerly awaiting their arrival. It occurs to 
me that a memory expansion and RAM disc 
configuration would be a worthwhile 
investment and that is being considered. 

Dr. Stuart Donald, 
Dundee College of Technology. 





Basic Archiving 


May I rave about Archive which I find a 
really excellent programming language, 
much better than the little of Database II | 
have seen? The only problems one gets 
from it are those relating to understanding 
Basic programming techniques, in 
particular the use of pointers in file 
handling. For example, after doing a 
WHILE-ENDWHILE on a condition, the 
current recor4d pointer is indicating the 
record after the last one for which the 
condition was true and not the last one of 
the condition. 

If you are in doubt about where the 
pointer is, slip in a PRINT RECNUM( ) 
command and you can then usually work 
out what has happened. In reply to Keith 
Tearle, Sinclair QL World March, the only 
problem I have had with screen layouts on 
Version 2 is that SINPUT will not accept 
input from the last character position of an 
input field, which means that all fields have 
to be made one character longer than the 
maximum entry required, but, I must 
admit I have never had as many as 32 fields. 

Julie Benson, 
London SW16. 
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environment long enough for the initial 


excitement surrounding their introduction tohave 
subsided. Microsoft's Gem and Apple’s Mac have both 


proved the desirability of such systems, while at the 
same time setting the standard for those to follow. _ 
WIMPS software offers a user-friendly front end 
which permits the operator to carry-out basic 
housekeeping tasks without having to resort to the 
computer operating system. Information is presented — 


on the screen in the form of graphic icons. To carry-out — 


a particular task, the user moves a pointer, usually 
controlled by a mouse, to the relevant icon and presses 
a button. 

The theory behind WIMPS is that it should be simple 
enough to enable someone with little or no knowledge 
of the operating system to carry-out disc filing and 
other essential tasks. To that end, a parallel is drawn 
between using the computer and running an office. In 
_ addition to facilitating filing operations through the u use 
of everyday symbols, extras such as a calculator, 

_ calendar and clock are often provided. 
_ WIMPS, however, should not be regarded purely as 


| ~ anaid to the computer illiterate. It provides a useful tool 


for anybody wishing to carry- out what can often be 
tedious, mundane operations in a fast, convenient 
_- manner, which leads us neatly to the subject of the QL. 


Given the popularity of the machine in business 


circles, combined with its cumbersome command — 

_ syntax, it is perhaps surprising that it has taken until 

now for what can truly be called WIMPS to appear. 
Eidersoft’s con Control Environment made its 

: first appearance in the latter part of last year. The | 

addition of a professional-looking mouse will 
undoubtedly make it a more attractive sino for those 

who wish to escape the tedium of SuperBasic file : 

handling. 

As well as the mouse Fidersoft are providing Their 
article graphics package. The mouse compatible 
software enables freehand designs to be created and 
features interchangeable brushes, block copying, 
geometric designs, area fill, and other useful functions. 

The software for the mouse has been incorporated 
neatly intoa ROM cartridge only slightly larger than the 
one which housed the original ICE. It protrudes about 
3cm. from the ROM socket, trailing a metre of cable to 

which is attached the mouse. In operation, the mouse 
performs admirably, moving the pointer smoothly 
round the screen with no sign of flicker. Moving the 
mouse about 12cm. carries the pointer the width of the 
screen. It is therefore possible to operate the mouse on 
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IMPS — windows, icons, mice and pointers — 
—have beenapartofthe computing 
icons displayed i in the border area to the left and 


- —microdrives, floppy and RAM discs — calculator, 


the software to their preference, most provide useful 





top a the QL Micarve panel although a desk-top 
would be preferable. 

On power-up with the ICE ROM j in place, the centre 
of the screen is occupied by the main window, with 


bottom of the screen. They show the storage devices 


calendar, a bin for file deletions and an ESCape button. 
Other functions are represented in text form ona bar 
Across the bottom of the screen. They include options 
to re-name files, customise ICE parameters such as 
the mouse click repeat time, change the device names 


and set the system clock. While some of those 


functions are purely cosmetic, enabling users to tailor E 


enhancements without you having to think too much 
about it. The clock, for example, date stamps each file 
directory entry whenever it is updated. 


ae 2 


Moving the pointer to a device icon and clicking the 
right-hand button displays a directory in the main 
window. Different icons are used to distinguish © 
between file types and if the directory is of more than 
12 entries the remainder are displayed on subsequent — 
pages. Once the directory has been loaded it is a 
simple matter to carry-out filing operations. The file on 
which you wish to work is highlighted by placing the 
pointer over it and single-clicking with the left button on 
the mouse; it then becomes the current ile forall 
operations. 

Performing the same operation on an active file 
Causes it be become inactive. In that manner it is 
possible to select a number of files on which a single 


ee 








Until recently the 
preserve of machines 
like the Apple and 
Atari, Icon driven 
software and mice 
have now arrived on 
the QL. 


The ABC 
alternative. Fewer 
buttons, but more 
bulk. 
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command can be performed. Both EXECutable files 
and SuperBasic programs can be run from within ICE 
by placing the pointer over the file and clicking the 
right-hand button. A more recent feature is the 
autoboot facility, which will allow you to load, for 
example, Quill, in the normal manner, with the ICE 
ROM present, thus preventing you having to go through 
the ICE routines. 


The Eidersoft 3 
button mouse. 


There are a number of facilities in addition to the 
general housekeeping functions. The view option, 
selected from the menu bar, outputs the contents of an 
active file to.a small window. Because of the limitation 
of the small window size, it is possible to examine only 
a small part of the file at any time. The complete thing 
can be viewed section by section, using the MORE 
button, and output to the printer is obtained in the 
same manner. It is difficult to see how this facility could 
be of great use, other than to examine SuperBasic 
listings or files created using the Psion packages. In 
either case a more acceptable output could probably 
be obtained in the conventional manner. 

Of similarly dubious value is the calculator. While 
ease of operation is considerably improved by the 
presence of the mouse — the pointer is positioned 
over the relevant keys and input is displayed on the 
imitation LED screen — | cannot imagine anyone 
wanting to use it in preference to the genuine article. 
More useful is the calendar. As well as providing 
information for the date-stamping of updated files, it is 
possible to page back and forth through the months 
and check on particular day/date combinations. 

The only other mouse-driven, icon-based system 
which could be described realistically as an ICE 
alternative is the ABC Electronic EASE, or Easily 
Applicable System Environment. The complete 
package comprises the mouse; EASE software on 
Microdrive; and Giga-Basic, a SuperBasic extension. 

The first thing to strike one about the hardware is its 
ungainly appearance. The two-button mouse is neat 
enough — about the size of a cigarette packet and 
raised at the rear — but the method of connection is 
extremely messy. The lead terminates in a D-plug 
which fits into one end of the interface, a black box 
about the same size as the mouse. At the other end, 





connected in the same manner, are two more leads. 
One of them is the connection to CTRL1, the other 
takes power from the ROM socket. 

With the mouse connected and the QL switched-on, 
EASE boots-up in the usual way. Icons are displayed on 
the right of the screen and the pull-down menu bars 
across the top. EASE is very much more window- and 
menu-orientated than ICE. It is possible to exercise 


greater control over how information is presented, 
although that is not necessarily desirable. 

Working upwards from the bottom of the screen, the 
final three icons represent storage devices — the two 
Microdrives and a third device which can be configured 
by the user. Moving the pointer over the disc symbol 
and clicking provides an icon-based directory window. 
Up to seven window directories can be displayed 
simultaneously and therefore it is possible to examine 
the contents of several devices without clearing the 
screen. 

With so many windows on the screen, things may 
become confusing and the EASE dustbin performs the 
function of closing the topmost window. It is not used 
to delete files, as that function is provided on a 
pull-down menu. 

The remaining icons are all concerned with the 
manipulation of windows on the screen. The duplicator 
allows a copy of the window to be displayed on another 
part of the screen, so that separate parts of the page 
can be worked on simultaneously. Windows can be 
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enlarged or reduced and their contents scrolled in any 
direction. Therefore it is possible to have a page much 
bigger than the window through which it is viewed. 
Finally, the windows can be positioned anywhere 
within the screen area. 

Just as icons are used exclusively for window 
commands, housekeeping operations are performed 
under control of Mac-style, pull-down menus. In all, 
there are five. Moving the pointer to the first, marked 
DESK, and clicking pulls down the menu. That 
particular menu offers the choice of a scientific 
function calculator or a sliding puzzle-type game. The 
other four menus have several more useful functions to 
call on, including file deletion and copying, formatting, 
sorting, and view. 

Like ICE, EASE can be customised to suit your 
particular requirements. The default media can be 
Switched from Microdrive to floppy discs, the scroll 
speed of the windows can be altered, as can the speed 
with which windows are moved about the screen. 
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OF MICE & MENUS 


There is, however, no option to change the speed at 
which the pointer moves. 

It is difficult to make a straightforward comparison 
of ICE and EASE as they differ, not only in individual 
aspects, but in their approach to the whole idea of 
desk-top systems. ICE has the edge in terms of 
available options and its structure is altogether tighter, 
making it easier for the novice to assimilate. Neither is 
there any question that the Eidersoft mouse is a 
superior product to its ABC counterpart. 

EASE, on the other hand, has more flexible window 
facilities and will probably appeal more to those who 
prefer a greater degree of control over how their 
information if formatted on output. At210DM, which is 
roughly £60, it is considerably cheaper than ICE, 
though a straight price comparison may not be totally 
relevant, depending on your preference for Extended 
Basic as against the ARTice graphics package. 


SOOS0eE 


| ARTice. Mouse 
i Assisted Design. 





Users with RAM expansions and disc drives will be 
tempted to opt for ICE, as it offers the possiblity of 
multi-tasking with the CHOice software which costs 
£14.95. That permits use of all four Psion packages — 
or any other EXECable programs — concurrently, 
provided you have adequate memory space, and 
allows switching between them. 

Having used both systems, my preference is for ICE. 
Being ROM-based it is more convenient to use and it 
has all the facilities one could reasonably expect. When 
used in combination with the Choice software it 
transforms the QL into a powerful, multi-tasking 
workstation which is difficult to fault. 

Eidersoft, The Office, Hall Farm, N. Ockendon, 
Upminster, Essex RM14 3QH. ICE, Mouse and ARTice 
£89.95 or £65 if an ICE Cartridge is traded in. CHOice 
multi-tasking software £14.95. 

ABC Elektronic, Huegelstr 10-12, 4800 Belefeld 1, 
West Germany. Giga Soft Mouse, EASE and Giga-Basic 
210DM ex postage. 
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Micro A€nutha 


COMPUTERS, PERIPHERALS, ACCESSORIES & SOFTWARE 
220 TOTTENHAM COURT ROAD, LONDON WIP SAF. Tel:01- 636 2647 TELEX:946240 CWEASY G (Quote 19010170) 
224 TOTTENHAM COURT ROAD, LONDON W'P SAF, TEL:01- 680 6382 TELEX:EASYLINK 19010170 


LONDON W.1 


QL BSOFTWARE 


LEISURE BUSINESS 


Special Introductory Offer 
CITIZEN 120D Printer 
features include: 


12Q cps draft 
QL Adventure Classics. £ 9.00 25 cps NIQ Project Planner 
QL Fictionary (£13. 4K buffer Entrepeneur 
QL Bounder .00' Tractor feed Intergrated Acc 
friction feed Cash Trader 
cartridge interface Mailing List (Trans) 
2 years warranty Stock Control (Trans).... 
189.95 Appointment Dairy 
including Miracle System Interface Archiver 
6& VAT 
£209.95 





3D CAD AUTODRAWN INTERACTIVE GRAPHICS WITH DESIGN BOARD II 


3D CAD GRAPHICS ON THE QL with DESIGN BOARD II Suitable applica- 
tions: Architectural. Technical_Drawing. Maps. Science. Circuit-Design. 
Students. D.I.Y_Enthusiasts. Includes * C.A.D autodraw of 2-D & 3-D 
graphics + mirroring N.S.E.W * Line_banding * On screen X,Y co_ords with 
optional linking grids * 4 texts mixable with graphic * 3 brush paintbox * 
Extras to C.A.D & QL graphics, 2D & 3D BOX-OCTAGON TRIANGLE-HEXA- 
GON-PENTAGON rotatable 360’ * Spiro-graphics * Graphics angle indicator 
* Advanced screen dump:(EPSON cmp) 

With 3D & C.A.D graphics + it’s many features “Design Board II” has to be 
considered as the TOP QL design package. £24.95 


Q_PRINT: Put your QL to work! & print your own stationary ie INVOICES. LET- 
TER HEADINGS. STATEMENTS. VEHICLE SURVEY REPORTS. DELIVERY 
NOTES. TIME SHEETS. JOB CARDS plus many more. Allows input of Com- 
pany title & details etc + optional justification and auto numbering: 

Saves pounds on printing billis. (Canon compatable). £14.95 


ART MASTER: A feature packed art & drawing program with an advanced, full 
A4 format screen dump (EPSON compt-—) £14.95 


LAS_VEGAS: 2 highly addictive games with arcade sound and action “FRUIT 
MACHINE” with Holds. Nudges. Jackpots. Plus “CASINO ROULETTE” with on 
screen gaming table (takes up to 18 bets in any single play) £11.95 


FREE SOFTWARE OFFER 
Fruit Machine with every order over £20. 
For further program details Send to or Phone 0204 29643. 


Micr_A_Soft 134 Hardy Mill Road, 
Harwood, Bolton BL2 3PJ 


Cheques or postal orders payable to Micr_A_Soft + 50p p/p UK. 











EIDERSOFT MOUSE 


SCRABBLE -—£14.00 -INCLUDES - ICE 
- - ARTICE 


LANGUAGES 


Digits! Basic Compiler QL Computer with Version 2.3 Software 
5 Forth + Reversl.. £26.00 Microvitec Cub 1451/0QT3 with Stand 
Super Monitor... £18.00 Philips 8M7502 Green Screen with cable 
Super Sprite.. Philips CM 8533 Colour mon 
Cumene single 3.5 720k disk drive with 
Cumsne Oual disk drives 
Above disk drive Include Cumana disk interface 












Epson LX 60 printer 
5 Assembler 3 Taxean Kegs KPB8IO call foristest price 
GST Macro Assembler ‘ Miracle System Modaptor with Qcode term S/W.. £ 38.00 
QL Assembler ' Miracle 512K Expanderam £119.00 










All prices include VAT. Postage on orders above £15.00 is free. Add 50P to order 
under £15.00. Please edd £6.00' for delivery of printers, monitors and 
Overseas orders are welcomed. 






Postal Rate Apply For U.K. Only 






NEV FROM TALENT! 


A complete set of tools — everything you need to write, edit and debug 





programs written in Assembly code. 


THE ASSEMBLER mm 
‘we WORKBENCH 8 


THREE MAIN PROGRAM MODULES: @ Full Screen Editor @ Assembler @ Monitor and Disassembler 


The Editor can operate on RAM or disk files. Assembly FEATURES: 
programs can be edited, assembled, executed and 




















debugged in memory with no microdrive access. The Editor AAe COR Le A ne a Ses eae 
is also suitable for programs in other languages — @.g. Trace code in RAM and ROM On-line help 
SUPERBASIC. Dual screens (for graphics Trace code QDOS traps option 
The Assembler can operate in a conventional two-pass mode gate te Gk to backing store ee sl AEE cemn ose a 
or as a one-line assembler. Multi-window display Break and trace points 
: ore ian! Set registers Printer and file access’ 
aia ee useful dual screen facility fo assist iN  sgarch. Move. Fill Insert etc. Function key definer 
ugging graphics programs. Job and channel control Various screen layouts 
NE ED 
COMPARISON WITH OTHER PRODUCTS The ASSEMBLER WORKBENCH is compact, elegantly designed and 
P| ee ADDER | COMPUTER ONE | DIGITAL PRECISION | METACOMCO easy to use. Comprehensive instructions are provided on the master 
mbler itor, lonitor Assembler | Monitor/Disassembler QL Assembler ‘ : : : 

Workbench | Assembler Version 3.0 Development Kit cartridge. They can be accessed easily to give full on-line help 
| Assembler | oT oe | x | oe fx hfe Gat anytime. 
enter | | XD ate) A hahe® of anil ee Xe Available from: 
iat - [6 i x ree oe ex : ei cash Curran Building, 
[Textedter fe fe [x fe | x | e | SY. 2 a 104 St. James Road, 
a en Se LEN Glasgow Gd ONS. 
7 es ee Oe ee Mf | Access & Visa hot-line 
| Easy Graphicdebuggingnf @ [| x [| x [| x [| x | x | COMPUTERSYSTENMS 041-552 2128 





20 Sinclair/QL World May 1986 


Is memory expansion and RAM disc 
software a viable alternative to floppies? 
Leon Heller investigates the options. 


Now that relatively low-cost memory expansions of 
256K and 512K are available from several suppliers, 
together with RAM disc software, many users will be 
interested in whether this approach is a viable alterna- 
tive to the purchase of a floppy disc interface and disc 
drive. 

The term RAM disc might be unfamiliar to some 
users, so a brief explanation is needed. A RAM disc is an 
area of memory which has been configured to behave 
like a very fast disc Just like discs —and Microdrives — 
a RAM disc must be formatted before use. The memory 
allocated to the RAM disc is then unavailable to pro- 
grams, which might be important if you create a large 
RAM disc and are also trying to run large programs — 
you might run out of memory even with a 512K RAM 
expansion. 

Another point to watch is that since the contents of 
RAM are lost when the machine is re-set or turned off. 
any data held in the RAM disc which you want to retain 
must be saved to Microdrive or disc or it will be lost 
irretrievably. It is also advisable periodically to save 
files which are being modified, in case there is a power 
cut or, more likely, someone trips over the mains lead 
to the power supply and the plug is pulled out. 

Most of the RAM disc software available from various 
suppliers has been written by Tony (Qdos) Tebby of 
Qjump, who supplied me with the latest version of his 
software on disc. RAM disc software not from Qjump 
should not be markedly different from the Qjump pro- 
duct. Some suppliers of disc and memory expansion 
interfaces provide the RAM disc driver software as part 
of the interface EPROM, so that it is available whenever 
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the interface is plugged into the machine. It is available 
on disc or Microdrive from suppliers of memory 
expansions. 

My copy of the Qjump RAM disc driver was accom- 
panied by four pages of documentation, starting with a 
section for beginners who are new to the concept, fol- 
lowed by sections on RAM disc compatibility with the 


QL Toolkit filing system extensions, RAM disc creation, 
heap fragmentation, Microdrive emulation, and two 
programs for copying Quill and other files from Micro- 
drive to a RAM disc, and copying files back to a Micro- 
drive at the end of a session. 

Loading the RAM disc software from disc or Micro- 
drive is very simple and is best done as part of a “boot” 
program, when the machine is re-set or powered-up. A 


aw 


Miracle Systems 512K RAM - disc software is optional. 


small amount of memory is reserved with RESPR, 
about 1,900 bytes of machine code are loaded, and 
then CALLed, That is almost instantaneous. 

With the RAM disc driver loaded, up to eight RAM 
discs may be created using the FORMAT command. 
For instance, “FORMAT ram2_200” will create a RAM 
disc called ram2, with 200 512-byte sectors (100K) of 
storage. All the usual file-handling commands may 
then be used with the RAM disc, by using the device 
name “ram2” in place of the usual “mdv1" or “mdv2". 
Thus, to copy a file named “fred” from Microdive 1 to 
the RAM disc, you type “COPY mdv1_fred TO ram2_ 
fred”. 

Once a file is loaded into RAM disc, it can be acces- 
sed very much faster than from Microdrive or disc. Any 
files which need to be loaded into RAM disc are best 
loaded like the RAM dise driver, as part of the “boot” 


program — after the RAM disc has been formatted, of 
course. 

If you need to make the memory allocated to a RAM 
disc available as ordinary RAM, any RAM disc can be 
removed by formatting it with either a null name or 
zero sectors, as in “FORMAT ram2_” or “FORMAT 
ram2_0”. Of course, any files within the RAM disc are 
lost and should be saved to Microdrive or floppy disc 
before removing the RAM disc. 

The QJump product I have been using has several 
other useful features; extended filing system com- 
mands from the QL Toolkit and Microdrive emulation 
are provided. The Microdrive emulation means that 
the Psion packages may be used with RAM discs with- 
out modification, since the command “RAM_USE mdy” 
will change the name of the RAM disc driver to “mdv’, 
instead of “ram”. When Quill is used, for instance, all 
commands which previously accessed the Microdrives 
will operate on RAM disc files. You have to remember 
to transfer your document files from Microdrive to 
RAM disc, of course, and save them back to Microdrive 
when you have finished. 

When memory is being allocated and re-allocated, 
as happens when RAM discs are created and removed, 
a phenomenon called “heap fragmentation” often 
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reduces the amount of available memory. The latest 
Qjump RAM disc driver has some code incorporated 
which reduces the amount of fragmentation which 
occurs but it is best to leave RAM discs as they are, 
when they have been created, until the machine is re- 
set. 

By using the Psion packages with RAM disc, wear and 
tear on Microdrive cartridges should be reduced sub- 
stantially and they should therefore last very much 
longer. 

On a 512K QL; two RAM discs, one of 630 sectors 
(315K) and another of 50 sectors (25K), leave more 
than 120K of RAM free. Therefore it is feasible to load 
most of the Metacomco Lattice C compiler — the two 
compiler modules, text editor, linker, and library files 
— into the larger RAM disc, with the source code files 
in another RAM disc, and use the system for serious 
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software development without spending upwards of 
£200 for a single disc drive and interface. 

A512K external RAM expansion can be obtained for 
around £125, so a saving of &75 is possible and you 
have the benefit of a total 640K of RAM, with faster 
operation due to the external memory. RAM discs are 
very much faster than floppies, greatly speeding the 
process of compilation and linking, The only disadvan- 
tage is that the compiler and other files must first be 
loaded into the RAM disc from Microdrive, which takes 
several minutes. That need be done only once at the 
Start of a session, however, and the reduction in time 
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MCS Expansion with RAM disc software on ROM. 


when going through the usual edit-compile-link-test 
cycle when developing software with a compiler is 
considerable. Similar increases in productivity can be 
obtained with other compiled programming 
languages of course, such as Pascal and Fortran, as 
well as assembly language. 

If you have disc drives, RAM disc capability is still 
very useful. All the benefits mentioned still apply, 
although the time savings will not be so dramatic, 
because of the speed of discs compared to Micro- 
drives, especially when dealing with large files. Opera- 
tion with a single drive becomes perfectly feasible, 
however, since discs can be backed-up by copying all 
the files to a RAM disc, swapping discs, and copying all 
the files to the new disc. All the benefits mentioned, 
when using large complex pieces of software like com- 
pilers, still apply when using discs. 

Apart from the initial loading of the files at the begin- 
ning of the session and saving the files at the end, there 
will be no difference in speed between machines, with 
discs and machines with Microdrives, and a 512K QL 
with RAM discs will easily out-perform a standard QL 
with floppies when used in this manner. 

Summing-up, it would appear that an expanded QL 
with RAM disc software and Microdrives is a viable 
alternative to a standard QL equipped with discs and is 
even better in some respects, because of the increased 
speed of reading and writing files to and from RAM 
disc, compared to floppy discs. A 512K expansion is 
advisable, especially if you intend to use products like 
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the Metacomco Lattice C, or the Prospero Software Pro 
Fortran, but many users will find 256K adequate for 
use with the Psion packages. 

RAM Expansion with Disc Interface and RAM 
Disc Software 

64K/128K/256K RAM, disc interface and parallel 
printer port 

PCML Ltd 

Royal Mills 

Esher 

Surrey KT10 8AS 

Tel: 0327 67282 


64K/128K RAM, disc interface and parallel printer port 
Technology Research Ltd 

Unit 18 

Central Trading Estate 

Staines 

Middlesex TW18 4XE 

Tel: 0784 63547 


External RAM Expansion 

256K/512K with optional RAM disc software (extra) 
Miracle Systems Ltd 

Avondale Workshops 

Woodland Way 

Kingswood 

Bristol BS15 1QL 

Tel: 0272 603871 ext. 210 


Internal RAM Expansion 

256K 

Farmintel Ltd 

93 Chiltern Avenue 

Bedford MK41 9EH 

Tel: 0234 219814 

512K 

Silicon Express Ltd 

Silicon House RAM Disc Software 
Fowke Street DS Enterprises 
Rothley 25 Trinity Rise 
Leics LE7 7P] London SW2 2QP 
Tel: 0533 374917 Tel: 01 671 0209 









eFAcce cece ceeeceeeceeeeceeeneee . 
alee -* ashe aw 
wae a. LULA. SX. 


tome 





23 





SuperTOOLKIT 


FULL SCREEN EDITOR. PRINT USING. LAST LINE RECALL. ALTKEY. 
JOB CONTROL. FILE HANDLING. DEFAULT DIRECTORIES. EXTENDED 
NETWORK allows discs, printers etc to be shared between 

QL’S. New broadcast protocol included. Over 118 commands. 

Written by Tony Tebby. Toolkit on 16K EPROM +4 library rack + 
comprehensive manual. SuperTOOLKIT @ £34.50 inc vat p&p £2. 


* * NEWx* * CHARACTER FONT GENERATOR/EDITOR PLUS the following fonts E13B, OCR 
~ SUPERSCRIPT, SUBSCRIPT, LARGE AND SMALL ICON FONTS, ANIMATION FONT, UPPER 

& LOWER CASE OLD ENGLISH. for use with toolkit. @ £19.55 inc vat p&p £1. 

*& *&NEW* * RAM DISC SOFTWARE on microdrive @ £10.58 inc vat p&p £1. 


**NEW* * QL CROSS ASSEMBLERS 6502, Z80, 8048 series etc phone for details. 


QL MONITORS AND TV/MONITORS 
PHILIPS COLOUR 85 CHARACTERS 
TV/MONITORS PER LINE 
MEDIUM RESOLUTION 
16” MODEL 16CT2016 £285.90a Inc. VAT 
REMOTE CONTROL SUPER VALUE 
16” MODEL 16CT2216 £311.65a Inc. VAT 
We can supply up to 26” TV/Monitors— 
please ring for details. *: FREE 
ANTI-GLARE SCREEN LEADS SUPPLIED 
HIGH RESOLUTION FOR USE WITH QL 
GREEN MODEL BM7502 | 
@ £83.85b 
AMBER MODEL BM7522 
@ £85.10b 


HOW TO ORDER: 















D. S. ENTERPRISES 
01-671-0209 





OPEN: 


DON’T BUY A COLOUR MONITOR! 
HAVE YOUR 14” & 16” PHILIPS & PYE < 
COLOUR TV CONVERTED TO A TV/MONITOR 
FACTORY 
CONVERSION £80.50a 
RGB KIT £57.50d 
* Resolution better than 585 x 450 pixels. 
* Image clarity comparable to leading monitors. 


* Includes RGB lead for connecting with BBC/QL. 
* Conversions carried out at our workshops within 2/3 days. 


One £10.35c Inc VAT 
Five £34.50c Inc VAT 
Ten 57.50c Inc VAT 


Eprom Cartridge 


By Post. Enclose your Cheque/P.O. made payable to CARE Electronics. 


Or use your ACCESS. Allow 7 days for delivery. Please add carriage. 
9am-5pm MON-THUR a)@9.99 c)@1.00 
9am-4pm FRI/SAT b)@8.00 d)@2.00 


FEY MIRACLE SYSTEMS Gz 


— 14 day money back guarantee on all products — 
— 12 month warranty on all products — 

QL CENTRONICS PRINTER INTERFACE 
* Complete unit including 3 metre cable 
* Plugs into either SER! or SER2 
QL SERIAL CABLE .......... 
* 3metre cable 
CE, FOVETEIGE BPI , acccsecserveccsssctsiccectctivectoenstnnmineeanniaoctenie 
* Lets Atari/Commodore/Spectrum joysticks plug into CTL ports 
OR ens) ( Ee 
* Copies whole or part of screen to Epson compatible printer 
QL MODAPTOR .....00:cccccccersereneeees 
* Links QL to 300/300, 1200/75, 1200/1200 modem 


QL EXPANDERAM 256. , 
* 256K RAM with through connector for DISK I/F 


QL EXPANDERAM 512 ... 
* 512K RAM with through connector for DISK I/F 


QL RAMDISC SOFTWARE ..... 

* Configures RAM as disk lookalike 

* Ideally suited to MS EXP 

* Enables Microdrive software to run much faster with less wear on 
microdrives 

Fully compatible with Psion packages, SuperBasic etc. 


£19.50 












£14.95 





For signs, pictures, advertisements, banners and notices. | 
Letters any size, any shape, any colour, any stipple, any mode. 
Easy designing & editing. Font editor. 5 fonts included. — 


25, TRINITY RISE, LONDON SW2 2ZQP. 













MIRACLE SYSTEMS LTD Please send CWO. 
AVONDALE WORKSHOPS (UK ORDERS - prices include 
WOODLAND WAY V.A.T. & Carriage). 
KINGSWOOD (OVERSEAS ORDERS - prices 
BRISTOL include Carriage) 
BS15 1OL Send SAE for catalogue. 
Tel: (0272) 603871 Ext 210 

SINCLAIR and QL are trade 


marks of Sinclair Research Ltd 
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ICE makes all of the day to day housekeeping operations 

on your QL easy. ICE uses pictures (icons) to represent the 

functions and programs you are using. ICE is extremely 

powerful and can take action on multiple files, saving you 
typing commands over and over again. Most of all, ICE is very 
easy fo use and can be managed by almost anyone! 


ICE complete system £59.95 


Own programs. Mouse cursor, pOp-up Menus, alert 
boxes, icons, in fact most of the ICE routines can 
easily be incorporated into your programs giving 
them that professional appearance. 


ONLY £9.95 


Amazing! BJ is off again, this time in a 3D 
maze that will pose a challenge to alll. 
Over 75 screens of 3 dimensional action, 
as BJ battles against fireballs, energy 
zappers, lazers and even giant Chess 
pieces! Definitely a must! 
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Other programs If you require other Eidersoft programs not 
mentioned in this advertising please telephone for assistance. 
QSPELL £19.99+21 p&p ARCHIVER £18.95+21 p&p 

IMPACCT INTEGRATED ACCOUNTING £179.95 





ICE Toolkit is a library of extensions to Superbasic 
that allow you to use many of the ICE features in your 
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ICE comes on EPROM cantridge that 
plugs into the cartridge ROM port at 
the rear of the QL. 

ICE uses next fo no user RAMI! ©" ICE is 
always available to the user instantly 
no need to load from microdrive or 
disk ICE is fully compatible with 
the Psion™ applications and most 

QL commercial software ©7 ICE is 
fully compatible with Superbasic 
programs and can be called from 
Superbasic ICE is fully compatible 
with microdrives, disk drives and 

RAM disks ICE can be used in 
conjunction with the cursor keys, a 
joystick or a mouse ICE is 
multitasking Boot into ICE or boot 
program TV/Monitor 


ony £24.95 


CHOice is a powerful multitask editor that allows you: 
to run several programs simultaneously. It can be used to 
multitask the four Psion packages as well as many others. 
Most important of all, CHOice gives you direct access to 
ICE from other programs so that housekeeping need not 
mean leaving your chosen program. CHOice comes with 
RAM DISK software, a name and address database for 
Archive and a Quill/Archive mailmerge facility. 


ONLY £14.95 


Artice is the ICE drawing program. Artice works in both 
TV and Monitor mode. Artice features freehand drawing 
with a full screen, choice of brushes, colour change, 
texture fill, magnify and reduce, pop-up and pull down 
menus, mouse style cursor, rubber, rubber band lines, 
circles etc, and many other features. It is fully multitasking 
and can be used with the CHOice software if required. 


ONLY £12.95 
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offer lB ive 
to the microdrive 


Speeding up your data access with Viglen disc drives 
means instant reliable access every time 


Specially designed to fit neatly info the case of the Sinclair QL, the Q-Disc Interface 
Board (CST) and companion disc drives are colour-matched to compliment your QL computer. 
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Visit our showroom 
Open Monday - Friday 
930-530 
Saturday 930-400 






All drives are compatible 
and ready to plugin and use with all currently 
available QL Disc Interfaces. When bought 
with the Q-Disc Interface, they are ready to 
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st to: VIGLEN COMPUTER SUPPLIES. 
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Began Soe uge ao Be ius p Unit 7, Trumpers Way, Hanwell W7 204 
Other peripherals for the QL ue eee ; Credit card holders may order by telephone on 01-843 9903. 
monitors, £3 for printer 
MONITORS ‘eed BMye02 ‘ea ... £85 © stands Please send me 
epee Te Amber £89 «Unit 7, i | enclose Cheque/P.O. fors _____ including carriage. 
Prine. CotsuniTy. Conner : Trumpers Way, Make cheques payable to Viglen Computer Supplies. 
Hata acid Resolution £199 Hanwell W7 2QA. Name: 
| Cotour Monitor CM8504 £4 99 Tel: 04-843 9903 
Philips Medium Resolutio 
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Taxon Kogo KP810 —- 
Conon PR 080A £229 
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Signature: FUSS ous 


PRINTERS ven Dato Doisy Wheel Printer £499 
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ES for above printers ~ £25 

Perspex printer stond for: 
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4% col pnnter £27 
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In the concluding part of our Go feature 
Marcus Jeffery demonstrates the use of 
evaluation techniques with a 
SuperBasic version of the game. 


We dealt with the rules of the game of Go last month 
and saw why conventional tree-searching methods for 
finding the computer's move are hopelessly ineffi- 
cient. So what alternatives are there? The program 
listed below uses a static evaluation technique. In 
other words, it tries to find a reasonable move without 
using any look-ahead tree. In all, there are six evalua- 
tions: 


PROCedure group_evaluation 
PROCedure defend_connection 
PROCedure attack_connection 
PROCedure start_attack 
PROCedure start_connection 
PROCedure find_any_move 


Those six procedures are tried, in order, with 
evaluation terminating as soon as a particular proce- 
dure finds a possible move. The latter method helps to 
increase the average speed of the program by ensuring 
that subsequent procedures are not evaluated for 
every move. Nevertheless, the SuperBasic program is 
still somewhat slow, having to check many possibilities 
on each move, and would benefit greatly from compi- 
lation. 


FIGURE 1. 

The most important evaluation procedure is 
“group_evaluation’. It will check all the groups on the 
board, looking for any which are in ‘critical’ situations. 
A critical situation occurs if any group has only one or 
two liberties. If that is the case, the computer will play 
on to one of the liberty positions. 

Unfortunately, it is still possible that could try to save 
a lost group. That could occur, say, from the position in 
figure one, where the computer (black) will play the 
sequence of moves 1, 3, 5, but will still lose the group. 
Without at least some form of look-ahead, however, it 
is impossible for the computer to decide whether or 
not any group is dead’ —i.e., ultimately lost. You will 
notice that the other evaluation procedures check to 
ensure that clib% — the number of liberties — is gre- 
ater than two, before playing the move. 

When performing group evaluation, the procedure 
‘count’ is called. That calls a recursive procedure, 
‘search’ is called for the new stone; edges, created by 
the edge of the board, or the opponent's stones; empty 
intersections —i.e., liberties of the group. 
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That method resembles a ‘filing’ algorithm, mark- 
ing — using ‘marker%’— each stone or liberty which 
has previously been checked, to avoid infinite recur- 
sion. Using a more complex filling algorithm would 
require significantly more code but may operate 
slightly faster, especially for larger groups. A common 
such algorithm is the ‘Scan-Line Algorithm’ which 
works by filling ‘runs’ — horizontal lines — stacking 
the end points of the run for subsequent filling. 

The next four evaluation procedures all try to find a 
move using pattern-matching techniques. The stone 
patterns which they use are shown in figure two, 
though it is sometimes necessary to hold more than 
one orientation of the non-symmetric patterns. In all 
cases, ‘stoned!’ is the current evaluation position. That 
is governed by the loop ‘gl’, which scans the entire 
board. 


FIGURE 2. 

The purpose ofall the procedures is to defind, attack 
and start stone connections. They are not adjacent 
stones, but stones which are separated only by a few 
squares. Thus, if this ‘weak line’ were to be attacked by 
the opponent, a player would be able to connect the 
stones properly. It is very rare during the opening 
sequences to find players placing adjacent stones to 
surround territory. 

Figure three shows how the four-stone group on the 
left has surrounded only two vacant intersections — 
territory — but by using loose-connections, a similar 
number of stones can surround 23 points. Using pat- 
terns, the computer is encouraged to defend, attack 
and build those connections. The procedures analyse 
the positions in the following manner: 
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DEFEND_CONNECTION 

IF point#1 = Black 
AND point#2 = Black 
AND point#3 = White 

THEN try to play at point#4 

ATTACK_CONNECTION 

IF point#1 = White 
AND point#2 = White 
AND point#3 = Black 

THEN try to play at point#4 

START_ATTACK 

IF point#1 = White 
AND point#2 = White 
AND point#4 = Empty 

THEN try to play at point#3 continued p29 
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100 MODE 8 1390 END DEFine introductican 2640 ate" “ECHRE(pzZ MOD 16 ¢ 64) & (pX DIV 
310 initialise 1460 3: léi&atarise*’ ©= 


120 introduction REMark Sesssscessesaeseasecssssecsass 
130 print_poard pete 8 : 2 " 2670 RETurn ati TO 5S) 
140 white_sove 1430 DEFine PROCedure gene init 2680 END DEFine fnint_to_cher 
140 eovel-seovet+isblack_sove 1430 lecetioni=0: acvet=i rete REMark 2292805800850 08858658888080980800 
170 IF NOT finishZ THEN GO TO 140 1460 koX=0: finisnz=0 z 10 8 ; mt 
SOUKE nase eo Ten ed oniaO td Ne dalla ip oO eet lal 2730 LOCeh c.1Z,pz,"%,y2,00;c8,y® 
anst=*y° 9 84, P4,R 4, YS, 89,09, 
200 IF anst<>“N"™ THEN GO TO 180 case oe antine gene_init 2740 Sere ectgaes some cokes Pe Se 
210 message S,°" 1500 » FL 2750 IF at="“PASS" THEN ko tpie-is 
220 CLOSE ®3: CLOSE 84: CLOSE @S: CLOSE 86: CLOSES7 $510 MEllark eebecaceuccesscconcocncecusees 2880 
230 STOP 1320 3 2760 IF at="“QUIT" THEN finishz=1:80 TO 7900 
220 TETEr Ee SESeeeoocesecosenssanlresceees 1540 WINDOW®1, 512, 256, 0,0: PAPER®1,0:CL 581 S7OO* yereSt2 TE) 
260 3 13S0 REMark eee Board eee 2790 FOR c=i1 TO LEN (ys) 
270 DEFine PROCedure initialise 13540 BLOCK®1, 242, 162, 232, 16,2 2890 eS8zy8 ic) 
280 LOCal 1 1570 OPEN®S, scr_230x 1702023822 2810 IF c8$<°O" OR c$>°9" THEN sessage 
2970 blackZ=1 s whiteZ=2 : colouri=3 8500 CSIZE83, 2,0: PAPERGS, 1: INKOS, S:CLSO3 1,a¢ :60 TO 2740 
300 markerZ=4 «s libertyz=8 1590 PRINT@S," ABCDEFGHIJKLMND ° 26820 END FOR c 
310 boar d=RESPR (254) : wei ght “RESPR (254) 4600 FOR i=15 TO } STEP -1 2830 yi=ys 
320 DIN captureZ(2),clocz(2),tlocz(2) 1610 18=" "bisiS=i8((LEN(CI16)-1) TOD 2840 IF xX<i OR wZ>1S OR yZ<i OR yZ>1S 
330 DIN a8(@) i : 1620) «=PRINTOS,18;FILLO(" 2", 252,18 THEM message 1,a6:60 10 2740 
340 read_sessages 1630 END FOR i 2850 pl-léeyXexnZs 1 L=legality (pz, whitex) 
350 reed_haendiceps 1640 PRINT®3," ABCDEFGHIJKLMND ° 2840 IF 1%>0 THEN messege 1Z,2¢:60 TO 2740 
340 read_patterns 1650 WINDOWSS, 182, 150, 262,32 2870 make_move pi,whitez 
370 DIM dirxX(4) 1460 PAPERSS, 4: INK@3, 6:CLS83 2880 message 0,°" 
380 RESTORE 470 4470 FOR 1-1 TO 15:PRINTOS,FILLO("+",35)5 2890 INKOS, 7:PRINTOS," “sfnint_to_char8 (pz); 
390 FOR i=i 10 4 1660 REMark e228 Capture Window #s8 2900 END DEFine white_aove 
400 READ dirxtl) 1690 BLOCKG1, 194,54,32, 14,2 2910 8 
410 END FOR i 1700 OPENS4, scr _182x42e38x22 2920 REMark €29928699056080805 0088888005508 
420 DATA 16,1,-16,-1 1710 CSIZE04, 2,0: PAPERG4, 1:CL S04 2930 3 
430 END DEFine initialise 1720 REMark #2e8 Move Record 228 2940 DEFine PROCedure blaeck_sove 
440 2 1730 BLOCKS1, 194, 122,32, 76,2 2950 b1z=0 
4350 REMark SSSSSHSSSSSSSSSesSseeeeesasess 1740 OPEN®S, scr_162"110a38x82 27640 gr oup_evaluation 
460 5 1750 PAPERS, 1:CLS85:PRINTOS,* MOVES" 2970 IF b1Z=0 THEN defend_connection 
470 DEFine PROCedure resed_sessages 1740 CSIZE8S, 2,0: UNDERSS, 1 2980 IF blZ©0 THEN atteck_connection 
460 LOCal « 1770 PRINT®S,“No. Black Mhite":UNDER@S,0 29790 IF b1Z©0 THEN start_ettack 
490 RESTORE 540 1780 WINDOWES, 182,90, 38, 102 3000 IF b1X©O0 THEN start_connection 
500 DIM mess (7,42) 1790 REMark ese Input Area ses 3010 IF blZ=#0 THEN find_eny_sove 
S10 FOR a0 10 9 : 1800 BLOCKS! , 442, 24,32, 202,2 3020 IF biZ=0 THEN biz=-1:60 TO 3040 
320 READ sesstia 1610 OPENS4, scr _430x 12038208 3030 make_sove b1Z,blackz 
a ear ge ey ae 1820 CSI2E84, 2,0: PAPERSS, 1:CLS86 3040 n$=" “LeoveZint=n$((LEN{ns)-2) TO? 
a = -K. NK oe 1830 REMark e280 Message Area eee 3050 INKGS, SiPRINTOS, m8; 3 
SSO OATA = Sb tegal: Entrys L 1840 BLOCKO!, 442, 24, 32, 230,2 3040 INKOS,0:PRINTOS, fnint_to_char8(b1Z) 3 
S60 DATA “Stone sireasy on points 1650 OPENS7, scr_430x 12038" 236 3070 EMD DEFine black_sove 
370 eos Brit Sa sige ae 1660 CSIZE87,2,0:PAPERO7, 1:CLS87:FLASIO7, 3080 8 
380 “Illegal. cide on points is INKO7,S » 
S70 DATA * O.K. GAME OVER.* 1070 REMark ae Handicap Input ese aes nares k& Seeneeseesssesassseeaecessse 
600 DATA ™ 1880 handz=fninput8(7, 1) 3 
= 110 DEFine PROCedure gr evaluation 
610 BATA “How aeny handicap stones (2-9)7% 1890 IF handZ<2 OR handZ>? THEN GO TO 1880 3120 hi=-999 ee 
420 DATA “Type your acve, PASS or QUIT «s 1900 handicap hand% “ 
430 DATA “Want to pl in (vs? ° 3130 FOR gp=17 TO 255 
NS SO PESY SOS 1910 INKOS,S:PRINTOS," 1 "3 . t d*ep) && colourz 
640 END DEF ad 3140 gc z-PEEXK (board*+gp 
; ine reed_seaseges 1920 INK@S,O:PRINT®S, "Hncp 7; 3150 IF @c%<>0 THEN 
660 REMark sSeecsonssceseesessessaeseseces er — DEFine set_screen 3) bo 0 sca oP, gczteIF clibz>2 THEN GO 
470 2 
1930 REMark @eencesessanesoesnssaseacssseee 
Pics ee 1960 1 3180 tlock(2)aclocx (2) 
700 hncpeRESPR 144) ‘Wek cL ae Se 3190 gl X=cl ibzZs getecstnz 
RESTORE 750 oe 3200 FOR gq=i TO giz 
720 FOR 1-0 10 43 ht Na ct hE hn lie ste mt hed 3210 IF Jegality(tiocz(gq) ,blsckZ)=0 THEN 
730 READ hi: POKE hncp+i hz 2000 FOR teqk TO qishandz=1 3220 score=(BegeX/gl X-cl 1bX+2e91 XZ) 
740 END FOR 1 Waa Oe ee 3230 IF score>hi THEN hi=score:biz= 
tlocZ liga? 
730 DATA 68,204 2030 END DEFine handic 
760 DATA 68, 204,76 neo. ¢ a as riod 
770 DATA 68, 204, 76, 196 2050 REMark eteseenesssaseseceenasegdaanes 
Pro bata 8; z00¢70" 190132, 190 zoe « 3250 exo Fon oe 
» £04, 76, 196, ioe, 2070 DEFine PROCedure print_board ion 
610 cara Se. 504.76 adarias,140'92,200 2090 yi maa pashey 3790 8 eee: SNE 
2 pay 2 : \ pling a eecnece 
820 DATA i i llaas 2100 AT#4, 0,0: INKO4,SsPRINTO4, "Stones Captured" TG = alte pied | atcha cleats nied 
830 END DEFine re andicaps 2110 cis=" “tcaptureZ(i)sciS=ci8((LEN(ci$)-3) TO) 
040 1 2120 c20=" — “Ecapturel(2)scZ0—c20((LEN(c28)-3) TO) 3370 DEFine PROCedure find_eny_nove 
650 REMark ceesesecsecasenesseseeanaceses 2130 INKB4,7:PRINTO4,\" by WHITEs "3c28 3340 FOR el=17 TO 255 
860 .. 2140 INKO4,0:PRINTO4," By BLACK “3c183 Seas er ore-RlD*PEEK (unl ght*g)? 
we eae 28350 RTSS,050 | 3340 IF (gl && 240) AND (gl && 35) AND 
680 al 1,p 2140 FOR y=15 TO 1 STEP -1i 
eae ratte oan ae ae Bee 3370 iF Fegetiey tet, blackZ)=0 AND clibz>2 
900 RESTORE 940 2180 PZ=-PEEK (boar d+ 14ey+n? ese Y ose Se 
910 FOR 1-0 TO 71 2190 IF pZ=0 THEN INKOS, 6:PRINTOS, “+5 ee ie sear eset oe 
920 READ pi:POKE pat+l,pz 2200 IF pZ=@1 THEN INKO®S,O:PRINTOS, “O°; 3380 ea pen cA 
ao ra oe - oe tet ee 2210 IF pZ=2 THEN IMK@3, 7sPRINTOS, “O°; = ee ere 
9 87,5 36,4, ~3-,5 2220 END FOR x = 
woe eee wore tee eeverwrae 2230 EO FOR y sie Sseasesesseugeses 
940 DATA 33,16, 17,31,16,15 2240 END DEFine print_board 3420 REMark eseseccassaases 
970 DATA -33,-16,-17,-31,-16,-i135 2230 68 3430 1 
980 DATA -14,1,-15, 16,1, 17 2260 REMark SSSSSSSSSHSSSOSITHSSHSASSTOSE 3440 DEFine PROCedure defend_conmectian 
1000 DATA 48,353,352, 46,17,16 2280 DEFine FuNction fninput® (aX, 2) 3460 boundary bieck 
1010 DATA -48, -33, -32,-48,-17,-16 2290 LOCal sZ,a8,i¢ 3470 FOR gi-i TO 255 
1020 DATA 3,-14,2,3,-15,1 2300 a8="";:s190 3480 gal=PEEK (boar d+g!) 
1030 DATA -3,14,-2,-3,15,-1 2310 CLS8é: INKS, StPRINTOS, eeseS (mZ) 5" “35 INKOS, 75 3490 IF gaiebl ackz — oe 5 
1040 DATA 64, 33,32,4,-14,2 PRINTOS, a85 3500 Lio —— ag se ar 
1050 DATA -64,-33,-32,-4,14,-2 2320 REPeat get_char 3510 gbZ=PEEK (boards ( (9) +PEEK (pt 235 
1060 END DEFine read_patterns 2330 i G=INKEYS: 1 Z=COOE (18) 3S20 gct=PEEK (board ( (gl PEEK iptei)) 
1070 s 2340 IF 18<>°° THEN EXIT get_char && 255)) 
1060 REMark ssessesnecssoseasessosassecsese 2350 END REPeat get_char 3530 IF (gbZ=blackZ) AND (gcX=whitex) THEN 
1090 3 2360 IF 82-10 THEN GO TO 2530 3540 QOX= (gl *PEEK(pt>2)) && 255 
8100 DEFine PRUCedure reed_~eights 2370 IF 1%<>194 THEN GO TO 2450 3550 Scor e@=PEEK (wei ght +gdZ) ¢RND 
$130 LOCal a2, b%,c%,dz,u,y, ve 2380 IF sZ>0 THEN . 3340 IF (gd% && 240) AD igdX AMD 15) 
1120 RESTORE 1240 2390 38sZ-sz-1 AND (score>hi) THEN 
4130 FOR y=i TO 8 2400 a8=a3(i TO sz) 33570 IF legality(gd%,blackZ)=0 AND 
4140 FOR xwy TO & 2410 60 TO 2310 clib%>2 THEN hi=score:bi t=9dz 
1150 ateléty*xn 2 CXL“168y*+(16-%) 2420 ELSE 3380 END IF 
1160 BZ=1bexney s dL-16en+(i1b-y) 2430 60 TO 2320 3590 END IF 
1170 READ vz 2440 END IF 3600 END FOR pt 
P 
1180 POKE weight¢aZ,vZsPOKE weight*¢272-aZ,vZ 2450 IF (12>=94) AND (1%<4123) THEN 48°CHRO(1x-32) 3610 END IF 
1190 POKE weight +bZ, vi sPOKE weight +272-b2, vz 2460 IF si<wX% THEN 3620 END FOR gl 
1200 POKE weight¢c%,vZsPOKE weight*272-cZ%,vZ 2470 s=-sie1 3630 boundary 0 
prone a weight ¢+272-dz, vz aati eect & 18 3640 END DEFine defend_connection 
34350 38 
1230 END FOR y 2300 60 TO 2320 3460 REMark ©€892026096058006808588086888808808 
1240 DATA 0,1,1,.2,.2,.25202 2310 ep 1F 3670 ry 
8250 DATA — 4,555 454535535 2320 PRINT#6,163:G0 TO 2320 3480 DEFine PROCedure attack connection 
1260 DATA 707 —6,6,5,35 2330 IF sX©0 THEN GO TO 2310 3690 hi=-999 
sae. oe FehsFe5e8 2340 RETurn at 3700 boundary whitez 
te tc 6.5.4.3 2550 1 3710 FOR gl=i TO 255 
1290 DATA ‘esse 2560 REMark seccccecnsssesconcsasesessses 3720 gal=PEEK (board+g)) 
1300 DATA s 2570 8 3730 iF 
gaz=nhitez THEN 
1310 DATA ° 2580 DEFine PROCedure sessage (aX, at) 3740 FOR pt=pat TO pat+70 STEP 3 
1320 END DEFine read_~sights 2590 CLS87:PRINTO7, aeneS (aX) 3 295 
1330 8 2600 END DEF ine - 3750 gbZ=PEEK (boards ( (gl ¢PEEK (pt)? && 255)) 
1340 REMark €060095046500008800008080886080 2610 3 seesee* 3760 Se Soares d+ (gi ¢PEEK (pt+i)) 
i330 8 mena n sbbraeactian 2620 REMark £200989299998600000550900888688080 3770 IF igbtewhitez) AMD (gcX=blackzZ) THEN 
1360 DEFine @ in 2630 8 
3780 Qdl=(gl *PEEK (pte2)) && 255 
1370 gaee_init 2640 DEFine Fulction fnint_to chars (pz) 3790 scor e=PEEK (wei ght +gdZ) + 


1380 set _screen 2650 IF pz<O THEN RETurn “Pass * 
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IF (qdZ &% 240) AND (gdZ && 15) OD 

(ecore>hi) THEN 

IF legality (gez%,blackz)<O AMD clibz>2 
hi scar e:bl Zegak 


3900 REMark SeeSeseSeSsSSSSSSSSSSSSSLECCE 
3910 2 
3920 DEFine PROCedure start_attack 
3930 hi=-999 
3940 FOR gl=i TO 255 
39350 Qait=PEEX (boar d+g1) 
3940 IF gai-ehiteX THEN 
FOR pt=pat TO pat+70 STEP $ 


gci-igli +PEEKIiptei)) && 2535 
scor e=PEEK (wei ght +gcZ) +RND 
IF (gck && 240) AMD (gc && 15) AND 
(score>ni) THEN 
IF legality(gc%,blackZ)=0 AMD clibzZ>2 
THEN hi=score:bii-gcxt 


4050 END IF 
ROBE EMD IF 
4070 EMD FOR pt 
&0B0 Exp IF 
4090 END FOR gi 
4100 END DEFine start_atteck 
4110 1 
4120 REFark SCs OSSSESsSESTeessagsessese 
4130 2 
4140 BEFine PROCedure start connection 
41350 hi=-999 
4160 FOR gi=i TO 2535 
4170 gat-PEEX (boar d+gl) 
4180 IF gai=blecki THEN 
4190 FOR pt=pat TO pat+70 STEP 3S 
4200 gdZ=PEEK (boards (igi *PEEK(pt+2)) && 255)) 
4210 IF gdi=0 THEN 
4220 gebi=(gli+PEEKipt)) && 255 
4230 scor e=PEEK (wei ght +gbZ) +RND 
4240 IF (gpd GE 240) AND igbz% bb 15) OD 

(score>ni) 
4750) OIF legelityig@%,bleck2)=<0 AND clibz>2 

THEN hi-score:bli=-gbz 

Enwo IF 
END IF 
END FOR pt 


START_CONNECTION 
IF point#1 = Black 

AND point#4 = Empty 
THEN try to play at point#2 

Note that in some cases ‘boundary’ is called to fill 
the edge of the board with stones of a particular 
colour. That is to allow the procedures to make con- 
nections, not only with other stones, but with the edge 
of the board. The board is held in a series of 256 bytes, 
as shown in figure four. By always logically-ANDing 





FIGURE 4. 


any positions, the single border envelops the entire 
board. 

If none of the pattern evaluations is able to find a 
move, the catch-all ‘find_any_move’ procedure 
called. That scans the board, looking for a possible 
position. In choosing between positions, that proce- 
dure — and the pattern-matching procedures — use 
the ‘weight’ byte-array. That series of bytes — figure 
five — associates a value with each board position, 
depending on its importance. It is by no means a fool- 
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4290 Sa iF 
4300 @ FOR gl 
4310 ©@ DEFine start_connectian 
4320 13 
4330 REMerk ¢ee8e00¢0820200056506000886006686 
4340 3 
4350 BEFine PROCedure aake_sove (pi,ct%) 
4340 LOCal ai,ni,} 
4370 ni-O:1 atarise* - 
4380 PUKE (board+pi) ,c% 
4390 FOR iei TO 4 
4400 al@-piediriziid - 
4410 IF PEEK (boerd+aZ)=colouri-c% THEN 
4420 count seZ,colouri-cz 
4430 IF clib&t=O THEN koZeakinienie 
cetni:reaove si,colourti-cz 
444 IF clibiei THEN atarite-e* 
IF 


4440 B@ FOR 1 

4470 If nZ<>1 THEN koz<0 

4480 captur eZ (ct) captured (cZ) nk 

4490 print _board 

4500 END DEFine aske_scve 

4310 1 

4320 REMark sescecesecesesssseeessesssace 
4330 3 


‘4340 DEFine PROCedure reaove (p%,cX) 
THEN 


43550 IF PEEK (board+pt) =cX 

R340 POKE board+pZ,0:1F ci=blackZ THEN 
POKE weight +pZ,0 

4370 reaove piediriiid,cz 

4380 reaove pitdiri(2),cz 

43590 reacve pi+dirii3) cz 

4600 resove pi+diri(4) cz 

4610 END IF 

4620 END DEFine reaove 

4630 1 

4640 REMark sessecccocessecaceseogsaaunee 

46350 : 

4660 DEFine FuNction legality (pZ,cz) 

4670 LOCal a%,kZ,sZ,} 

4680 s1°0:k2Z=0 

4690 IF PEEK (board+pZ)<>0 THEN RETurn 2 

4700 POKE boerd+pzi,cz 

4710 FOR l=1 TO 4,4 

4720 alepiedirzil) 

4730 IF PEEK (boerd+axz)=colouri-cx% THEN 

4740 count aZ,colouri-cz 

47350 IF clibZeO THEN kZekZecstnz 

4760 eno IF 

4770 EMD FOR i 

4760 IF ki-O THEN 

4790 camt pzi,cz 

4@C0 If clibzZ=0 THEN sie4 

4810 EXD IF 

8820 POXE board+pZ,0 


4630 IF pickoX A@ kiei THEN si-3 
4030 © OEF ig 

DEFigr lIegelit 
4840 2 ¥ f 


pede REMark Ccecescscsocscecesecesececees 

a 

4890 DEFine PROCedure count (p%,cZ) 

4900 clibi=O 2: cstnz-0 

49710 clocZ(1)90 s clectk(2)<0 

4920 seerch pi,ci 

4930 wipe colourZz 

4940 END DEFine count 

49750 «4 

4960 PEMark 696624680606 868666808 0680688860 

4970 «+ 

49780 DEFine PROCedure seerch (pZ,ck) 

4990 IF clibzZ>2 THEN GO TO 3150 

3000 IF(pz && 240)=<0 OR (pz 86 15)<0 THEN GO 10 35150 
S010 IF(PEEKiboerd+pi) && colourl)=0 THEN GO TO 5110 
S020 IF(PEEK(board+pz) && cZLI=O THEM GO TO 35150 

30S IF (PEEK (board+pZ) && sarkerZ)>0 THEN GO TO 5150 
5040 POKE boerd+pt,ct*aaerker= 

3050 cetni=cstnxzei 

3060 search piedirZ(i),cz 

3070 search pitdirxz(2) cz 

3060 search piediri(3) cz 

3090 search piedirZz(4) cz 

Sioco @o TO 3150 

3110 IF (PEEK (boerd+pZ) && libertyZ)>0 THEN GO TO 5150 
3120 POKE board+pZ, libertyZz 

Sid0 clibZeciibzei 

S140 IF clib&’<3 THEN clocZiclibz)=pz 


3150 © DEFine search 


3160 2 

Si70 REMark £€6668666666566606660666602866666 
Sieo s 

3190 DEFine PROCedure wipe (aX) 

S200 LOCal 1 

3210 FOR 1-0 70 235 

3220 POKE boaerd+!l , PEEK (board+]) && a 
S230 ENO FOR 1 

3240 END DEFine wipe 

32750 s 

3260 REMaerk seecesscscosecacsacaceacseoes 
$270 s : 

3260 DEFine PROCedure boundary (vZ) 

S270 LOCel «,y 

3300 FOR x=0 TO 15 

3310 yriéen 

3320 POKE boerd+u, vz 

S330 POKE boerd+ty, v% 

3340 Eb FOR « 

3350 END DEFine boundary 

3360 8 

S370 REMark SCHSSESESESSEEESESESESESESSEESCEO 
3380 REMer& ©605END GF PROGRAMcceccecesae 





proof method but it helps to make the computer 
choose more sensible-looking moves. The ‘remove’ 
procedure, which removes groups of captured stones, 
sets the weight of any intersection, where a black stone 
has been captured, to zero. That is an attempt to dis- 
suade the computer from playing back on to those 
often fatal points. 

Finally, in the unlikely event that none of the proce- 
dures has been able to find a move, the computer pas- 
ses, setting the play position (b1%) to -1. 





It is often helpful to know why the computer chose 
a particular move. By adding the following lines, the 
computer will display the current evaluation 
technique in the bottom window: 
3115 message 6,"Group Evaluation” 
3325 message 6, Finding any move” 
3445 message 6, “Defend Connection” 
3685 message 6, ‘Attack Connection” 
3925 message 6, Start Attack on Connection” 
4145 message 6, ‘Start New Connection” 





FIGURE 5. 


The last message displayed will be the procedure 
which found the move. At the very least, it will give you 
something to look at while the computer is thinking. 

The program has been designed in modular fash- 
ion, making it relatively simple to add your own 
evaluation procedures. The only procedure which you 
are likely to need to call is ‘legality’, where ‘p%’ is the 
proposed play — using the board numbers in figure 
four — and ‘c%’ is the colour (black% =1, white% =2). 
Variables used in this procedure are LOCal, so there 
should be no difficulties. The procedure returns an 
integer number, where: 


0 = Move is legal. 
2 = Stone already on point p%. 


. 3 = Playing into ‘ko’ position, 


4 = Suicide on p%. The stone or group would have no 
liberties. 


Those numbers have been chosen to coincide with 
the error messages in the mess$ array., 

The modular development, and use of byte arrays 
for many features such as board, weight, handicap and 
patterns, also makes it reasonably easy to convert sepa- 
rate procedures into machine code, combatting the 
main weakness of the program — speed. 
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QL COMMUNICATIONS 


QCODE TERMINAL software. ...........cc::::ccsssseeeeeees rey £19.95 
Features: 
VIEWDATA TERMINAL — for PRESTEL and MICRONET 
* Split baud rate operation (75tx/1200rx) in conjunction with MODAPTOR (see below) — 
necessary for calling PRESTEL. 


Exclusive Datalink QL Products 
Datalink SPI — QL ....eeeeeeeeeeeees £19.95 


Serial to Parallel Printer Interface 


: : ; * Can handle dynamic frames. 
Plug -In-And-Go design, compatible with * Full emulation of colours, mosaics, separated mosaics, etc. 
; . * Save displayed page to file on microdrive or disk. 
any Centronics Parallel printers. x Save entire session to file on microdrive or disk. 
. * Replay, create or edit saved pages whilst off-line. 
Datalink RS-232 QL Printer Lead ....... £6.95 _ tome Weare Saves 


QL to 25 Way D Plug printer lead, 
2 metre cable. 


Datalink QL Joystick  ......csssssecssseeeseeees £9.95 
Quickshot II Style Joystick, 3 fire buttons 
Plug direct to CTL 1 or 2. 


VT52 (Scrolling terminal) —for use with Bulletin boards, electronic mail services, mainframe 
computers, etc. 
* 80 column (4 colour), or 40 column (8 colour) modes. 
* VT52 control codes, for fancy editors, etc. 
x Additional control codes to set display colours. 
x Alternate keypad emulation. 
* Upload or download text files using standard utilities on host. 
* XON-XOFF protocol. 
PLUS 
* QLto QL file transfer. Any file transferred from disk or microdrive, including executable 
files, Quill documents, etc. 
x Error detecting and correcting protocol. 


NE © GIEK sci unns vanliduoudistavcltndiuscacensensagnantansiaesot SSNRUNaNWNS TEARS £39.00 
* Links QL to 300/300, 1200/75, 1200/1200 modem. eg WS2000, PRISM 1000 & 2000, 
NIGHTINGALE, DATACHAT, VOYAGER 11. 
* Includes QCODE TERMINAL software. 
* State modem type when ordering if not 25 way connector. 


QCODEVASSEMBLER cccciscsssceectgecencieccttsssteecccseeectucteressccasssetv 


x with screen editor, fast M/c linker, & object library manager. 


QCODE GAMES: ovsssisicesscdtnnesstegeeddtecerstecentcecdcscueessescosnnstanassseues 


* 4games: sprite, lander, wall-up, moon lander. 


MODEMS: PRISM Modem 1000 with modaptor & software . £69.00 

Voyager 7 with modaptor & software . Phone for details 

Olas RAM DISK. ssssiscssescdeccesvcsinccncancasvecsscrcssecevsosteesacesstswsues £16.95 
* Up to 8 devices. Fastest available! Fully Q(DOS compatible. 


* Speeds up any program that accesses microdrives or disks. 
* Use with unexpanded QL or any memory extension. 


QCODE 
42 Swinburne Road Abingdon OXON OX14 2HD 
Telephone: 0235 28359 


Datalink QL Joystick Adaptor ............. £4.50 


Convert any Atari/Commodore/Spectrum 
joystick to use with QL. 
Plug direct to CTL 1 or 2 via adaptor. 


Prices include Postage, Packing & VAT 
12 months warranty and 14 days money 
back option with all Datalink Products. 








Dealer, Distributor & Export Enquiries welcome. 


Datalink U K Payment by cheque or 

99 Constitution Street Visa Card Welcome 
Leith Telephone for immediate 
Edinburgh, EH6 7AE dispatch 031-554 6040 


All trademarks acknowledged 





QEP Ill Advanced EPROM Programmer QTK II Super Toolkit 


QTK II, the QL Super Toolkit, is a rewritten 
version of the original QL Toolkit. 






The QEP III EPROM programmer was designed specifically to meet the need for 
a highly reliable means of programming EPROMS. It is cased, with resident 
firmware in ROM and fits in the QL expansion slot or an expansion unit. 


QEP III provides verification of EPROMS at 4V 4.3V 4.7V 5V 5.3V 5.7V and 6V: 
under and over voltage verification is essential for reliable EPROM service. It 
also features fast programming at voltages of 12.7V, 21V and 25V. 


QEP III can program 16k to 512k EPROMs with standard pinouts, or the data 
and address pins may be re-assigned for ease of PCB layout. 


QEP III can program EPROMs for multiple EPROM sets without any need to 
reload the data and it can program just part of an EPROM. 


QEP III is fully menu driven, making it not only powerful but easy to use. 

















QTK II has full networking for file serving, 
messaging etc., PRINT USING, wild card 
copying, deletion etc., programmable keys, 
last line recall, SuperBASIC editor, default 
directories, alarm clock etc., etc., etc. 











Essential for all serious QL program 
developers and educational establishments, 
it is available in ROM and (in a configurable 
form but without the network facilities) on 
Microdrive or floppy disk. 











@ 1 CO) Mi Coyali vol ae BY-Jelble fe (=i QRAM RAM Based Utilities 


QRAM is not just another fast RAM disk for the QL. 
QRAM is a set of utilities to get the most out of 
your expansion RAM. 


QRAM includes a dual function RAM disk, a general 
purpose printer buffer, an instant access print 
spooler, resident file system maintenance utilities 
and more besides. All are designed specifically to 
multitask even with the PSION programs. 


0) Upgrade 


QJUMP is the foremost supplier of QL floppy disk 
interface software. Upgrade your Sinclair / Micro 
Peripherals disk interface to the standard. 






















QMON II is the debugger for the QL: only QMON II has all the features 
essential for effective machine code debugging. 















QMON II has a single line assembler / disassembler - not just the 
simple disassembler of other monitors, but a complete memory editing 
MC68000 assembler for correcting or patching code. 








QMON II has comprehensive trace facilities - not just single stepping, 
but multi stepping, invisible trace, back trace and a macro command 
executable every trace step. You can trace to a printer or a file. 


QMON II has comprehensive breakpoints - not just on instruction 
addresses, but on register values and memory values as well. With 
the invisible trace, you can even breakpoint ROM. 


QMON II has pull-down windows - not just the fixed windows of other 
monitors but windows that restore the QL's screen after use, so that 
QMON can be used with programs that use the screen themselves. 





























QMON II Mdv / 534" £19.95 



































Dept W3 - For more information on these and other 
24 King Street CRAM ay Amor / 38 epee QJUMP products, please send an SAE. 
feaeee QEP Ill £115.00 If your QL dealer does not have the 
re: - - QFLP (MP) bare EPROM £14.95 products you require, you may order direct, 
Q using ACCESS/Mastercard or cheque with 


order. Please add £1.00 pp (UK) or £2.00 
pp (UK) for ROM version QTK II. 


Please add £2.00 for 34" disk. 
All prices include VAT at 15%. 






0954 50800 
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Resident problem poser 
Marcus Jeffery outlines an 
economic problem of 


intergalactic proportions 





on which to test your wits, 


Welcome to the greatest meeting of 
minds our galaxy has seen. With the 
expansion of the colony worlds to 
neighbouring systems, transport and 
communication have become a pres- 
sing problem. Though we now have 
the means of hyperspace transport 
through the sub-ether matter transpor- 
ters, their cost is still very prohibitive 
but I can now tell you that the colony 
worlds have formed a giant consor- 
tium to build a complete transport net- 
work. 

You have been gathered here to bid 
for management of this enormous pro- 
ject. The winner will be whoever can 
devise the cheapest network. In addi- 
tion to management of the project, you 
will receive the ultimate accolade of a 


year's subscription to that intergalacti- 
cally-renowned magazine, Sinclair QL 
World. 

As you know, a single matter trans- 
porter will work only in one direction, 
so each colony system must have at 
least one such device, connecting to an 
Output port in the destination system. 
All the raw material, labour costs, and 
so on, have been compiled into a table, 
shown in figure one. So, to build a link 
from colony ‘H’ to colony ‘E’ would 
cost 33 billion credits, whereas the 
reverse link would cost only 27 billion 
credits, 

You must devise a network of 
hyperspace links which connect every 
planet to every other. When doing that, 
it is feasible to travel from one planet 
to another via a third — rather than 
having a direct link — if that will 
reduce costs. One consideration 
which you should bear in mind is that 
the hyperspace transporters are not, as 
yet, 100 percent efficient. Therefore at 
least two distinct routes should exist 
between any two planets, as a fail-safe 


| i TRY FORM | 








| To Colony | 
| hoepee DE ome » He iho eee ie 
prioh SK | 
R B X | 
Ome & X : 
M D x | 
Pei 
fe E X : 
| oO G X : 
cl. Hl x | 
: G1 x | 
[N J 5 | 
ly x tl 
| L xX | 
| Total Cost =___ billion credits, ! 
| Name | 
: Address ! 
Niele Stina 
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against one of the links malfunction- 
ing. 

Having devised your least-cost net- 
work which satisfies those constraints, 
fill in the form, entering the total cost 
as the sum of all the links. Additionally, 
so that your entry can be checked for 
correctness, could you enter a number 
into each box on the entry form indi- 
cating the quantity of each link you 
would buy. For instance, if you felt that 
a circular network was best, connect- 
ing AB, BC, CD, DE, EF, . . KL, LA, your 
entry form would look like the one in 
figure two. Unfortunately, a single 
break in this inflexible network would 
mean disaster; it certainly does not 
meet the fail-safe constraint. 


PUZZLE PAGS 





RULES 


All entries must be written on the 
panel provided on this page. Any other 
form of entry will be disqualified. 
Entries must be sent by post to: 

Puzzle Page, 

Sinclair QL World, 

79-80 Petty France, 

London SW1H 9ED 
to arrive no later than Friday, May 17, 
1986. Please mark the envelope ‘Net- 
work Puzzle’. 

The winner will be the first correct 
entry drawn from the editor's input 
port. 

All entries will be judged by the 
Editor, whose decision is final. 


To Colony > 


C E 
43 26 
50 10 
4] 38 
13 ** 

3 4] 
29 38 

5 3 
20 11 
18 37 
10 28 
24 27 


SS st fe a SS rt Ss Sra ‘> 


12 


34 
42 
49 
1] 
Jian, 


‘CaP 
Liar 

Lomi 

jl 

Swaeee 
aD 2] 
IO ad 
#* 40 
46 ** 
30 24 
somrhy2 
390i 20 
16 


(Costs shown in billions of credits) 


TO COLONY 


i Gx Ps et ff Cea 
Sia | Sime | oS i S&S: | Silo | © | 54 ite 1 
S| Sl Osee | OS i oS | Otis | bd | mH lee 
S| eae | OnreS PoTtS |S bt) eH 1 Sl Set so 
— | > | SS |: S: | see 


A 
X 
0 
0 
0 
0) 
0) 
() 
0 
() 
0 
0 
0) 


S| aS has |, OS | S i Sj 1} 54 


OO. = iG) 
Total Cost = 239 billion credits 


F 
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MICRODRIVE SYSTEMS 








Silicon 
Price RRP 
MDVA 128K QL & thermal 
MEK QL & thermal 
— i & monochrome 
monitor 
Quattro QL & thermal 
printer & monochrome 
monitor — 
re) 
age 2 one monitor & 
Epson LX80 & 
Centronics Interface 
MDVE Quattro QL & Microvitec 
Colour monitor (with tilt 
and swivel stand) & 
Epson LX80 & 
Centronics Interface 


199.95 339.90 





275.00 449.15 






MDVC 





395.00 574.20 







675.00 757.45 









850.00 947.20 


ISK DRIVE SYSTEMS — 
Da preatra insider interface 





428K QL & thermal 
printer & single drive 
128K QL & thermal 
printer & single drive & 
monochrome monitor 
Quattro QL & thermal 
printer & dual drive & 
monochrome monitor 
Quattro QL & dual drive 
& monochrome monitor 
& Epson LX80 & 
Centronics Interface 
Quattro QL & dual drive 
& Microvitec colour 
monitor with tiltand 
swivel & Epson LX80 & 
Centronics interface 


395.00 538.90 





DDB 





465.00 648.15 







DDC 







675.00 873.20 
DDD 





g99.001056.00 © 
DDE 







4099.001246.20 


Savings of up to £218.00 


ite ste, neem le) nee): 
* Specifically designed for the QL 
Offers excellent 85 column text performance and 
outstanding graphics capabilities 


Incorporates high contrast medium resolution cathode 
ray tube 


Optional tilt and swivel mechanism 


* 


* 







PF 
gi 











| 




























* 


+ ££ & & - 


SILICON EXPRESS 
DISK DRIVE SYSTEMS 


* 


main expansion port 


* 


a 


includes new software utility disk 
Full microdrive emulation facility 


seconds 
Full two year guarantee 


Disk Drives 


314" single or dual track double sided with small footprint 
51%" single or dual 80 track double sided with power 
supply for EACH mechanism -— high reliability 


Utilities Disk 


Insider Disk Interface Card 
Fits snugly into the case of the QL, connecting to the 


incorporates complete ROM-based Toolkit utility and 


Fast access times e.g. boots ‘Quill’ in under 10 


User friendly utilities disk with each system 
Easy microdrive to disk file transfer 






TECO TM1265 MONOCHROME MONITOR 


High performance 80 column presentation ideal for 
word processing or spreadsheet applications 


Green or Amber dispiay 


Rugged cabinet with carrying handle 
Tilt facility 


Includes lead 






meley Waa (eka P44 
ATTR THE a Gereil rear peice INTERNAL MEMORY UPGRADE 
a oh edb i @) Fe M AL M =i" (@) RY : Expands your QL’s memory from 128K to 512K 


ot rier t Leaves the expansion slot free for other boards 
* Internally upgraded at our service centre — 


¢325. 00 see address below (NOT FREEPOST) 










512K internal memory 














Increased performance from memory * 7 day return service 

intensive software e.g. Abacus, Quill, * Contact our Sales Desk for further details 

Archive | 

ARNIN 

3 Expansion ports unaffected by mremery Memory wae boards ie excessive 

No power problems power from the QL power supply. This will affect 
* 12 month warranty the reliability of the QL when used with other 
* Includes Psion software — Abacus devices needing power from the QL. This is NOT 

Archive, Quill & Easel true of the Quattro memory. 

EPSON LX-80 CENTRONICS 
NLQ DOT MATRIX PRINTER : PRINTER INTERFACE 

* Up to 100 characters per second = * Connects QL to any Centronics compatible printer 
* Correspondence or draft quality printing * Plugs into SER1 or SER2 port and directly into printer | 
* Wide choice of typestyles * Fully self contained with 3 metre cable 
* Easy to change ribbon cartridge * 1K buffer 
* Standard Centronics connection 


Requires Silicon Express Centronics interface for 
connection to SER1 or SER2 ports 






ORDER FORM SS  . ._ ._ ._ ,____,__ _ ,_ ie ee ee 








For immediate despatch of goods you can order now by phoning us on Leicester (0533) 374917 quoting your Access or Barclaycard number. ; 
: ; Or fill in and post the coupon — no stamp required, and we will despatch your goods within 14 days. 
Please allow 14 days for delivery of postal orders — telephone orders immediate despatch SYSTEMS H 
; Insider Disk Interface board (IDI) @ £113.85 . QUATTRO QL @ £325.00+ + Free thermal printer £50 voucher 0 please tick 
Single 80 track double sided drive system including IDI @ £199.00* MDVA 128K QL System @ £199.95¢ t For internal memory upgrade, please send your QL 3 
\ ; ; : RECORDED DELIVERY together with your remittance, 
Dual 80 track double sided drive system including IDI @ £299* MDVB 128K QL System @ £275.00¢ Access or Barclaycard details for £125.00 to i 
*3%2e"0 5%" please tick MDVC Quattro QL System @ £395.00+ Silicon Express Limited. 
: i Double sided double density diskettes 51/4” pk of 10 @ £25.00 MDVD Quattro QL System @ £675.00 SENG eoe VaNtngo Menem ct ND f 
t Double sided double density diskettes 312” pk of 10 @ £35.00 MDVE Quattro QL System @ £850.00 - - 
Centronics printer interface @ £29.95 DDA 128K QL Drive System @ £395.00+ POST TO: Silicon Express Ltd., g 
} Epson LX80 @ £285.00 DDB 128K QL Drive System @ £465.00¢ FREEPOST, Rothley, Leicester LE7 70QZ 
Microvitec 1451 DQ3 colour monitor @ £275.00 DDC Quattro QL Drive System @ £675.00+ Name & Address : 
i Tilt and swivel for above @ £24.00 DDD Quattro QL Drive System @ £899.00 
Teco TM1265 monochrome monitor @ £79.00 DDE Quattro QL Drive System @ £1099.00 
: 


512K Quattro memory upgrade @ £125.00t 





press 


U.K. Tel: 0533 374917 








Silicon ex 


— Silicon Express Limited Silicon House, Fowke Street, Rothley, Leicestershire LE7 7PJ 





ABC Elektronic 


Huegelstr. 10 — 12 4800 Bielefeld 1 Western Germany 
proudly presents the Giga Soft 


VMouse 
for the SINCLAIR QL 


The Giga Soft Mouse comes in a ready-to-use package including a high quality mouse (resolution 
0.01”), an interface for the joystickport of the QL and a software package. 


The software consists of the following programs: 


Giga ome BasIC (Tested in QL USER 1/86 p. 58) 


A totally new type of Basicextension for the SINCLAIR QL. It adds more than 70 new commands 
to SuperBasic. Features: 











» Full mousecontrol from Superbasic » Programmable function keys. 

» Easily programmable MACINTOSH style » Comfortable texteditor like Basiceditor 
pull down menus. with 20 functions. 

» Very sophisticated spritanimation » Commands to program real windows (with 
commands. background refreshing) 

E % A € S * E = The new MACINTOSH style desktop cy 

Easily Applicable System Environment 

» E.A.S.E. is completely mousedriven. » E.A.S.E. has an inbuilt puzzle game. 

» E.A.S.E. supports real pulldownmenus. » E.A.S.E. gives you full I/O control, all 

» E.A.S.E. can work with up to 7 real functions can easily be accessed by using 
windows. the mouse. 

» E.A.S.E. has an inbuilt scientific calculator. » E.A.S.E. windows can be scrolled and 


moved across the screen. The size of a 
window can be changed by using the 
mouse. 


The price: Europe: 220 German Marks. Overseas: 230 German Marks 

How to Order: 

1. Send acheque to ABC Elektronic 

2. Transfer money to Postscheckamt, Dortmund, Account Mr. Budde Nr. 902 83 469 

3. Send an order to the above address. We will despatch it cash on delivery only for Europe. 

New Giga Soft Software Soon available: 

@ C-Editor the Character Set Editor for to use with Giga Basic 100 DM 

~ @ Giga Paint a good Copy of Mac Paint for the Macintosh, include converter from Spectrum 
Pictures to QL Format. It will only run with more memory. Please ask for details. 

New Giga Soft Hardware soon available: 

@ Q Sound Interface. With a 3 Channel Sound synthesiser, a lot direct sound commands for 
to use in every program. Further a Centronics Port for to use with a Printer. Please ask for 
more details. 

@ Giga Soft Keyboard: Upgrade your QL in a PC with a new IBM style keyboard with 10 
function keys and a numeric field and a real professional keyboard feel. The new keyboard 
works with a small interface to plug in the QL Expansion Port. It will work with other interfaces 
without problems. Please ask for more details. 
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TDI 





LANGUAGES 





Ithough the QL has yet to make a name for itself 
A: a games machine, the more professional 

language software market is very competitive. 
Metacomco is one of the leading names in the field, 
with five language packages — Lisp, Pascal, 
Assembler, C and BCPL. A lesser-known but prolific 
range is available from TDI Software Ltd. 

The two major TD! language products are UCSD 
Pascal and Fortran-77, along with an Advanced 
Development Toolkit for more serious users. The main 
inducement to opting for the TDI packages is that all 
the languages are based round the universal P-system. 
So what is the P-system? 





P-SYSTEM 

Developed by Soffech Microsystems in San Diego 
during the late 1970s, the P-system is a universal 
working environment for small computer systems. The 
P-system is by no means exceptional to the QL but runs 
on a wide range of 8-bit to 32-bit processors, providing 
Standard compilers for Pascal, Fortran-77 and Basic. 
The advantage is that files written on the QL can be 
transferred easily to any other computer running the 
system, making software extremely portable. 

Rather than compiling programs to machine code, 
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the compilers produce P-code, for use on a theoretical 
P-machine, though native code can be produced for 
time-critical operations. The P-code files are 
completely processor-independent, allowing portability 
of programs across any machine running the P-system. 

The major disadvantage with compilation to P-code 
is that it tends to run more slowly than its machine code 
equivalent, requiring a P-code interpreter to be 
executing. If memory is a problem, however, P-code is, 
on the whole, more compact than machine code. Also 
if you can afford the optional Advanced Development 
Toolkit, you will also have a Native Code Generator for 
converting P-code programs to 68000 code. 

All micros running the P-system have exactly the 
same working environment, with the same commands 
for editing, running and filing software. Those 
commands are operated from a hierarchy of menus. 
Working from the top of the structure, a number of 
options are available, including Help, Edit, Run, 
Compile, Assemble, Debug and Filer. 

Having selected any of them, you will find yourself 
either in the appropriate command or at a further level. 
For instance, choosing Edit displays a second-level 
menu, with such options as Adjust, Find, Insert, Delete 
and so on. That heirarchy of commands is shown in 





EEE DITO 
aS eS as, 
MS i a ASE, 





UCSD Pascal, 
Fortran-// and 
Advanced 
Development Toolkit 
from TDI Software. 
Reviewed by Charles 
Gerrard. 


SJIVNINVT IGL 





figure one, giving some indication of what is available 
in the P-system environment. 

When booted, the P-system operating system 
displays the level one “Command Menu” — Edit, Filer, 
and the like. For compatibility with other systems, the 
menu is shown on the top line of the display, rather 
than making use of such QL-specific features as 
windowing, and so on. That makes the system much 
easier to use for anybody familiar with the P-system 
but very difficult for beginners. For instance, when in 
Edit mode, you will have access to a full screen editor. 
Choosing Insert will allow you to insert text into a file 
and at that point the top line menu displays that: 
<bs>  {backspace}deletes a character 
<del> {delete} deletes aline 
<elkx> {edit accept key} to make the insertion 
<esc> {escape} to reject the insertion 
QL Compatability 

That is all very well but, unfortunately, the QL has no 
‘edit accept key’ and uses CTRL-backspace for delete. 
In those cases, CTRL-C will perform <etx> operation 
and CTRL-Q will delete a line. If you have not used the 
P-system previously on any other machine, you are 
likely to find that rather confusing initially. 

The wealth of documentation which accompanies 
the software is very comprehensive. Unfortunately it is 
so verbose that finding the piece of information you 
need can be difficult. In general, the manuals are 
designed for reference and the one book which is 
definitely missing is a general users’ guide. 
Nevertheless, persevering, two of the manuals refer to 
the screen editor. Having checked carefully through 
them, you will be no wiser but — credit where credit is 
due — eventually the Owners’ Handbook tells you 
which keys are which. 

Fortunately, the P-system can run in either of two 
configurations. The standard configuration displays the 
top-line prompts | have mentioned, providing complete 
compatibility with any other systems. The second 
option allows the P-system to work with other 
applications programs to display user/machine-specific 
displays and prompts. 

TDI has documented the configuration which is has 
developed for use on the QL in the QL Owners’ 
Handbook, so anybody with the appropriate knowledge 
of 68000, Qdos and the P-system can tailor the system 
to their needs. It is a pity that TDI did not provide 
an optional environment specific to QL users, with 
Suitably-altered displays and prompts. That would 
have made the system far more generally attractive to 
the average QL owner. 


System Software 

Each of the language packages is supplied on four 
Microdrive cartridges. They contain a host of files, 
though the general user can disregard many of them. 
In fact, three of the cartridges show only a single file 
when accessed from Qdos, and the P-system is 
necessary to view the true contents. 

Essentially, each package will contain the P-system 
Operating System (SYSTEM.PASCAL), the P-code 
interpreter (SYSTEM.INTERP) and the QL configuration 
parameters (SYSTEM.MISCINFO). The latter file is 
explained carefully in the QL Owners’ Handbook, 
supplied with each package, and a utility is provided 
(CONFIG.CODE) to allow users to configure the system 
to their specific needs. Figures two and three show the 
other files supplied with each language, along with a 
brief description of the use of each. Figure four shows 
the extra facilities available with the Advanced 
Development Toolkit package. 

The system appears to be aimed mainly at the 
professional user and such people are likely to be 
interested in the Advanced Development Toolkit. Itis a 
package supplied on three cartridges and is essential 
for full use of the system. For instance, the Turtle 
graphics code files, the Pascal cross-referencer, a 
native code generator, a ‘compress’ utility — allowing 
P-system programs to be run outside the P-system 
environment — and a debugger are all included in the 
kit. The files and utilities can be included in the main 
library (SYSTEM. LIBRARY) using the librarian utility 
(LIBRARY.CODE), both of which are supplied with the 
basic system. 

The one thing you should not expect to be able to do 
with the packages is load a Microdrive and write a 
program. Initially you have to work out which cartridges 
to use. Having read through the Owners’ Handbook, 
you will know how to copy cartridges and you will have 
been informed of two different start-up procedures. 
Which you choose depends on whether you have 
add-on RAM or not. If not, the PBOOT (or FBOOT for 
Fortran) goes into mdv1_, and press F1 or F2, as 
normal. 

Then you wait for something to happen. If you have 
sufficient memory, a much better method involves 
using the Pascal — or Fortran cartridge in mdv2_ — 
allowing the system to copy the files to RAM, then boot 
from RAM disc, greatly speeding operations. 
Fortunately, backing-up cartridges and booting the 
system are fairly well explained in the book in which 
you would expect to find them but that is not always the 
case. 
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Reading list 

The documentation supplied with the products is 
comprehensive, verbose and bewildering. In addition 
to the QL Owners’ Handbook, whichever system you 
buy you will also receive The Operating System 
Reference Manual, which provides the beginners’ 
introduction to the P-system, the use of the screen 
editor, and general file management. 

Before using the P-system properly, it is also a good 
idea to check the Program Development Reference 
Manual, which explains the compilation options and 
goes into more detail on file management. Advanced 
Development Toolkit owners will also have to study that 
booklet which includes sections on the debugger, the 
native code generator, turtle graphics, and so on. 

Finally, depending on which language you have 
bought, you also receive either the Fortran 77 
Reference Manual or the UCSD Pascal Handbook 
which describe the languages, including any variations 
and extensions to the standard language 
implementations. 

lf you have also bought the Advanced Development 
Toolkit, your extra manuals consist of the Applications 
Development Reference Manual, which describes the 
program development tools — including both editors 
— the normal on-screen editor, and EDVANCE for 
large files — available either in the basic system, or as 
part of the Advanced Toolkit. Other toolkit files, such as 
the REMTALK utility, which allows machine-to-machine 
file transfer via serial ports, are also discussed. In 
addition, the manual explains the use of the language 
extensions for inter-lingual communication, allowing 
Fortran, Pascal, Basic and assembler units to interface 
with one another. 

The more serious user will also need the Assembler 
Reference Manual and the Internal Architecture 
Reference Manual which describe the P-system, 
P-code and the P-machine in detail. They are again 
supplied with the toolkit. 

The languages 

The SofTech Microsystems Fortran 77 is very similar to 
the ANSI standard Fortran 77 subset. A number of 
additions from the full standard have been included, for 
one reason or another. The only two features not 
supported are that procedures cannot be passed as 
parameters, and that INTEGER and REAL data types 
use different amounts of storage. It is unlikely that you 
will ever find a situation where passing a procedure 
parameter is essential, especially on small systems. 
The Fortran system supplied defaults to four-word 
reals, but alternative compilation files allow for 
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two-word reals. 

There are a number of P-system extensions to both 
the Pascal and Fortran implementations. For instance, 
a number of compir directives may be used to allow, 
Say, different language units to communicate with 
each other. Another extra to standard UCSD Pascal and 
Fortran are turtle graphic commands, configured for 
use on the QL in either four- to eight-colour modes. 
They should be compatible with other P-system turtle 
graphic implementations but some terminals will not 
have the available colours, and one or two 
implementations are known not to be able to display 
text and graphics simultaneously. 

Although the language products will run on a basic 
128K QL, TDI recommends either add-on memory 
and/or disc drives for a more acceptable performance. 
The P-system requires 64K of RAM for storage, 12K for 
the P-code interpreter and 5K for the interface to the 
Qdos operating system. TDI suggests that a QL with 
206K add-on memory is a practical minimum 
configuration. 

With that set-up, the system would operate mainly 
from RAM disc. Alternatively, disc storage of at least 
400K is suggested, though that is likely to be more 
costly. A word of warning to anybody reading TDI 
advertisements concerning the speed of its system. It 
is measured on a QL with extra RAM and TDI states in 
the Owners’ Handbook that it has “observed that RAM 
cards with ‘zero wait states’ cause the QL to run 
approximately 80 percent faster than when using only 
the 128K internal memory.” 

In conclusion, it must be said that the TDI programs 
are definitely designed for the professional user. If you 
are looking for a new language, predominantly for use 
on the QL, you would be best-advised to choose one of 
the excellent Metacomco packages. Metacomco has 
taken far greater pains to ensure that its packages are 
best configured for the QL user. On the other hand, TDI 
has tried to maintain the P-system user interface found 
on other micros. It is ideal for anybody using the system 
on other machines but makes the software much less 


friendly for the casual wear. 


TDI SOFTWARE 
TDI Software Ltd, 29 Alma Vale Road, Bristol BS8 2HL. 
0272 742796. 


UCSD Pascal £99.95 
UCSD Fortran-77 £99.95 
Advanced Development Toolkit £49.95 


(There is a £5 p&p charge on all these products) 


TDI LANGUAGES 





Q 
NI 





BREAKTHROUGH SOFTWARE 


GREAT INNOVATIONS FOR THE QL AT SENSIBLE PRICES 


REAL WINDOWS!!! £6.50 inc cartridge & p&p 
Each Real Window is stored off screen. It can be swapped with the part of the 
screen it overwrites, altered and then swapped back again. Several windows 
can be overlapped and ‘shuffled’ onscreen. Makes professional Pull Down 
menus, possible as the screen is restored to its original state when the window 
is put away! Text and graphics are both handled! Real Windows are controlled 
from basic using only three commands (all machine code):- 


BREAKTHROUGH ON-LINE SUPERBASIC MANUAL £8.50 inc cart/p&p 
Press the F1 key and the screen you are working on (text, listing, graphics 
including multiple windows) is saved instantly! Enter a Superbasic Keyword and 
everything you want to know is displayed on screen. Flip between screens to 
check syntax etc. Contains ALL Superbasic commands and much more. 
Create your own help files with Quill. 


MULTITASKING PRINT SPOOLER £6.50 inc cartridge & p&p 
Touch a function Key then type in the input filename and the output file will 
transfer data from one device to any other device. It will be sent to the printer or 
network or even another file, whilst you continue with what you were doing. Full 
machine code and multi tasking. Works from within Psion packages! Includes 
command to exit and re-enter Quill, Archive etc from Basic. 


FAST LOADER FOR SUPERBASIC £7.50 inc cartridge & p&p 
Loads even the longest Superbasic Program as quickly as professional 
software packages. Saves and loads all 96K of Systems Variables. SuperBasic 
program, variables, data and machine code routines as a single binary file! 
EVERYTHING loaded and ready to go in one operation! 


* *& & FREE x x * FREE x * * FREE PROGRAMS * * * FREE x x * 
8 M/C BASIC COMMANDS + SCREEN DUMP & RECALL 
FREE WITH ALL PURCHASES 


GETN & GETS Allow you to edit variables on screen. MCCUR Moves the cursor 
up down left or right. TAB Moves the cursor to the given column no (left or right). 
FONT Allows you to reset the font address. Makes user designed graphics 
possible. RMODE returns the current display mode. DUMP dumps 1 or more 
lines from the screen to the printer. BVAR returns address of Basic Variables. 
PLUS HI RES SCREEN DUMP to printer at the touch of a key AND RECALL F5 
gets back the last line you typed (as in archive), edit your errors and re-enter the 
line. 


Send cheque/PO to: 


17 SHAFTESBURY WAY, ROYSTON, HERTS, 
SG8 9DE Telephone: (0763) 45482 


CHROMAGRAPHICA 
Works: BEVERLEY, N. HUMBERSIDE 


Sales: HORNSEA N. HUMBERSIDE 
Telephone: 04012 4699 


HIGH RESOLUTION —_——— 
COLOUR MONITOR 
£249.95 inc vaT 


Come and see 
us at the 2X 


Microfair 
May 10th 





HIGH 
RES! 
Cased in 
colour 

to 

match 
your 
computer 








| Chroma | | 


14” screen, resolution 585 x 895 Pixels 
SPECIAL DISCOUNT FOR STAND VISITORS AT THE 
ZX MICROFAIR ON MAY 10th 


FOR AMSTRAD, ATARI, BBC COMM128, AMIGA, 
Q.L., SPECTRUM 128 Etc 
R.G.B. input and High Resolution is the only way to see properly the 
true detail and brilliance of modern computers and software. 


Spectrum 48 needs the converter. 
Special price £28.95 to buyers of Chroma I. 





First come, first served! Telephone your order for priority. 


Send your cheque to: 
CHROMAGRAPHICA, 135 Cliff Road, Hornsea, North Humberside 
HU18 1JB Telephone: 04012 4699 


ARs yg Bac ND cra sry Sberanceow ealtventansi ons woe elgg Mamransentdbtnnoeennnt sno teesas 
TELEPHONE oo: 2eteten see ceansensasevses COMPUTER i. cccsscblesatteeetyCancien. 


Please supply: Chroma | £249.95 + £9.95 carriage. Converter (for 
Spectrum 48) £28.95 inc. VAT. 


Please indicate your choice of case colour 
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T. K. COMPUTERWARE 


Your QL Stockists 


Utilities & Games: Business: 

Eidersoft ICE Eprom .......... 24.00 AYGHIVG! a1... Bib eetceseeeceen ces: 17.00 
Eidersoft ICE Artice ........... 12.00 ~Qspell (Carl) Be. scers cece 20.00 
Eidersoft ICE Choice ......... 15.00  QOspell: (Gdisk): ceircccccmsiccs.cs. 24.00 
Eidersoft ICE Toolkit .......... 10.06" GSR: TAGE! fo cesercreereseesenws 64.00 
IGE SCUADOMC: .-cernce--eesencen-s 59.00 Project Planner .................. 35.00 
Eidersoft Mouse-ICE-Artice 87.00 Entrepreneur ..............8 35.00 
Supercharge-ICE-Choice ..87.00 Decision Maker ................. 35.00 
CFU (Mes oidonsneceneronivness nig 9.25 Integrated Accounts .......... 78.00 
PRIN) ISR secoeecscas cots sonceksorees 17:00 impact StOCK ...:.0ci.c. 46.00 
Cartridge Doctor ................ 13.00 Impact Sales Ledger ......... 46.00 
WOON eer enexndienersyntean 15.00 Impact Purchase Ledger ... 46.00 
Sova bwiley Less esnsecccscscseseness £5.00 Impact Stock Control ........ 46.00 











Hardware: 
512K Expanderam ........... 119.00 
256K Expanderanm ............ 
MGCIAQION paso a) dpassvarsvmnnde oe. 


A full range of QL products in stock — please phone for 
further details. 


All prices include VAT and First Class UK Post 


* Payment by Barclaycard, American Express, * 
* Diners,Access * 


For a personal service and same day despatch phone: 


030381 2052 


or send Cheque, Postal Order, Eurocheque to: 


T. K. COMPUTERWARE 
Stone Street, North Stanford, Ashford, 
Kent TN25 8DF Telex: 966676 PMFAB G 


Dual d/drive-1/face ......... 287.00 
Fandata QCon).iscxcde..: 129.00 
Centronics Interface ........ 


Its easy to 
complain about 
advertisements. 
But which ones? 


Every week millions of advertisements 
appear in print, on posters or in the cinema. 

Most of them comply with the rules 
contained in the British Code of Advertising 
Practice. 

But some of them break the rules and 
warrant your complaints. 

If you're not sure about which ones they 
are, however. drop us a line and we'll send you 

| an abridged copy of the Advertising Code. 

Then, if an advertisement bothers 
you, you ll be justified in bothering us. 

The Advertising Standards Authority. 


If an advertisement is wrong,were here to put it right. 
ASA Ltd. Dept 2 Brook House. Tommngton Place, London WCIE 7HN 
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DS Enterprises 
(01) 671 0209 







Disks 
5.25" DS DD DS QD 
Unbranded (Recommended) £12.50 ........eeccescsscecccececeeeeeeceeees £17.00 
Maxell 5 cee... 40.00. eee ccincs. See, £20.00 
3.5" SS DD DS DD 
PO og tosdeerectt es Prmartreeet tate a uskeee 2 FS £32.50 
Dudswaiudte luted vosiatavnsabkes POO) Scesterees 2s ans icersecenedasis EOOIOO 







All disks are guaranteed and come packed in plastic flip & file type boxes. 






Drives 






QL, Spectrum or BBC Compatable. 
Single 80 Track Dual 80 Track 
SO ee es erttle iste se cette. iS) 05 Cn RR Re te £195.00 







QL Software 


Lattice C 
Pascal (Full ISO) 
Super Charger (Basic Compiler) 







Ram Disc (Ram Disk: & Utilities” ........0: 22 £14.95 
DURSISIIGIC sauce er ssessexas scceunasewasssassvssivcsapn on Mruanevoreest warwick £17.50 
TW tars ahac aye sitad tet ee nla ee se tase ctcnesaesinccecsctsyesorettnnenuprencenees 









Add On’s 









912k Memory Expander (Sandy) .............cceccecssesessececccccceeeeee £125.00 
(neluding: Bam Disc: Software)..j.........ci-cccerrsenecscrseerenneseeess £130.50 
GST DIBC IMO ACS esceciec rein negotbec ee Oe £82.50 
Duial-3.5" Drives InteriaGe—.<.-....cescssctesssessdesssvavseeseessusacsoel £265.00 
ZOD 2i{ TUG GILES OCHA) 1. 00d cccsacvsestecccccerscessscnsecserceess £115.00 
Gentronics GLP'(NLQ@ PFiMRON) - ssceciccssctetiesetecs tote cosdecceceeuee £160.00 






Special discounts on complete packages or large orders, call for 
details of all QL or Spectrum needs on 01-671 0209. (All prices are 
inc P&P and VAT). Make All Clieques Payable To: David Storton, 
25 Trinity Rise, London SW2 2QP. 







TANDATA COMMUNICATIONS 





Ts ph-Yoy gale] a 


FOR THE QL:- 
JOSS £15 on mdv or 514’ fip, £17 on 312’ fip 
Forget that tedious, time-consuming syntax! Just move the cursor and press 
SPACE for all your file commands. Cursor keys or your joystick access microdrives 
(up to 8) and floppy discs (as many as your interface allows) with up to 150 files 
on each! Scroll and print directories, COPY, DELETE or PRINT any file, select TV or 
Monitor mode before LOADing/RUNning a program. Use keyboard only to set date 
or label the medium. Easy to use with Psion or other software. No silly icons to 
learn — JOSS will tell you what it’s doing! Mass copying/printing utilities and pro- 
grammer’s toolkit. Specify your disc interface or microdrive only. 

RefQL7 £11 on 2 mdvs or 1 31’ fip, £9 on 514.” 
For use with ARCHIVE 2, contains 1300 useful references and a search/print pro- 
gram. Find programs, articles and reviews buried in the magazines on your shelf! 
Update RefQL5 for only £4. 
















Mdv Extension Cable (8" £5.50 
Add ZX Microdrives to your QL. 
Joystick Adaptor £4.99 






FOR THE QL, SPECTRUM, BBC & ELECTRON:- 
WD Morse Tutor £4 cassette, £6 mdv or 514", £8 314" 
Teach yourself to read Morse Code. For absolute beginners and those aspiring to 
18 wpm! Feedback on screen or printer, random letters, numbers or mixed, 100 
random sentences, many helpful features. Spoken phonetics via Currah Micro- 
Speech (Spectrum). Discs unsuitable for BBC B+. 
FOR THE SINCLAIR SPECTRUM:- 
WorDfinder 2 £8 cassette, £10 mdv or 51/4”, £12 314" 
Solves anagrams and missing letters. 16,000 words from 3 to 10 letters long. Very 
fast machine code. Upgrade WorDfinder (1) for £2 
DISC VERSIONS:- 
Opus, TR Beta and LMT SPD1 formats available for the Spectrum. 3” disc versions 
available soon (same price as 312"). 


WE EXPORT hardware and third party software. Ask for lists. 
PAYMENT — STIRLING or ACCESS/MasterCard. Add £1 outside Europe. 
WDSoftware(QU), Hilltop, St Mary, Jersey, C.I. Tel: (0534) 81392 

















FOR THE SINCLAIR QL Far: 









APPROVED 
for use with 
telecommunications systems 
run by British 
Telecommunications 
in accordance with the 
conditions in the 
instructions for use. 










features. 


Q-CONNECT 


Q-MOD 


Tandata 


Tandata Marketing Limited 


Albert Road North, Malvern, Worcs. WR14 2TL 
Telephone: 06845 68421. Telex: 337617 Tandat G. 


Prestel *799# Telecom Gold 81: TANOO1 
A subsidiary of Tandata Holdings plc 
Prestel is a registered trade mark of British Telecommunications plc 
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Q-CALL 


W LOW PRICE! 


The only communications package for the QL. 
| The modules are available separately but, by 
using all three as a complete matched system, 
= full advantage can be taken of the integrated 





Complete RS232 output for general 
communications from 75-9600 baud with full 
two way buffering and flow control. Software | 
on a micro drive to support all 3 modules 
includes Prestel Viewdata/Videotex and 
VT100 emulation, and many other features. | 





Manual dial V23 modem operating at 1200/75 | 
bps and 1200/1200 half duplex. 





Provides traditional pulse/loop disconnect 
auto-dial and auto answer. 






Ty “129. 95 


Q-CONNECT AND 
o) Xe) \ hi 


109-9 





PRICES INCLUDE VAT 


I'd like to know more about Tandata 
communications for the QL. 


Name 








| Address 











Tel No 


Send to: 

Tandata Marketing Ltd., 
| Albert Road North, Malvern, 
Worcs. WR14 2TL. 
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James Lucy shows the 
way to professional 
screen presentation 
using SuperBasic 
windows and some 
imaginative 
programming tricks. 


Windows are one of the features which 
set the QL apart from lesser machines. 
For the QL programmer the versatility 
of the screen output is a great advan- 
tage in producing high-quality, easy-to- 
use programs. One of the most useful 
features, and one which forms a major 
part of both SuperBasic and Qdos, is 
the ability to display simultaneously a 
number of different screen windows. 
We look at harnessing that power, 
highlighting some of the lesser-known 
display facilities and present a short 
program, the Window Editor, which 
can be used to create the attractive and 
professional-looking — multi-window 
displays used on many commercial 
programs, 

Opening windows 

A window is an area of the 512x256 
pixel screen set aside for output from a 
particular channel. When the QL is 
switched on the initial windows 
attached to SuperBasic channels 0,1,2 
are set up according to information in 
the ROM and are, of course, different 
for monitor and TV mode. Some 
foreign language Qls will have 
further window differences in TV 


mode. 


AVIEW 


The window associated with a chan- 
nel may be changed by the SuperBasic 
command WINDOW; the point to note 
is that the position of a window is 
defined relative to the screen origin — 
the top left-hand corner of the TV tube 
in effect — but subsequent commands 
using pixel co-ordinates such as 
BLOCK operate relative to the window 
origin. In fact, once a screen channel 
has been created, it is not possible to 
establish the dimensions and position 
of the window without peeking the 
channel tables or executing a little 
machine code. 

Windows, of course, may overlap 
either partially or totally, in which case 
clearing one window will destroy any- 
thing in the overlapping part of the 
other. Some of the SuperBasic exten- 
sion programs now available, such as 
Giga-Basic, make possible non- 
destructive overlapping windows of 
the type used for the pull-down menus 
on the Macintosh but, if large areas of 
screen are being saved to RAM, the 
amount of memory required can 
become a problem. 





Enhancing effects 


SuperBasic offers a number of facilities 
not provided by lesser Basics and it is 
relatively easy to overlook them if you 
have learned programming on 
another machine. The commands PAN, 
SCROLL and CLS, for instance, do not 
necessarily operate on the whole win- 
dow. The following codes are used to 
denote areas of the display: 


0 — Whole window area (default 
value). 

1 —Area above, but notincluding, cur- 
sor line. 

2 — Area below, but not including, 
cursor line. 

3 — Whole cursor line. 

4 — From the cursor to end of cursor 
line. 


CLS can use any of those codes, PAN 
can take areas 0,3,4 and SCROLL areas 
0,1 and 2. Imaginative use of the 
facilities can create some interesting 
effects. Suppose you wish to reverse 
the normal order of displaying succes- 
sive printed lines — that is, you would 
like the first printed message to appear 
in line 6, say, of your window and the 
next message to replace it on that line, 
the first line scrolling down to make 
room for it. That means the user always 
knows where to look for the next mes- 
sage and creates an effect similar to 
that used on some advertising signs. 
The following procedure does the 
trick for messages less than one line 
long, assuming mode 8 and normal 
character size: 


100 DEFine PROCedure prt(string$) 
110 AT 4,0: SCROLL 10,2 

120 AT 5,0: PRINT string$ 

130 END DEFine prt 


You can try it out by typing in this 
line, too: 
FOR a=65 to 90: prt FILL$(CHRS$(a), 
20):pause 10 
Note the use of FILL$, another neg- 
lected function. 
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Further interesting effects can be 
created by using two overlapping win- 
dows, perhaps with different paper 
colours, scrolling, panning and clear- 
ing part or all of either window. The 
full power of the QL screen driver 
begins to be apparent when you con- 
sider that it can be done for a large 
number of different windows almost 
simultaneously, 


Quick on the draw 
BLOCK is another under-used facility, 
perhaps because most drawing uses 
the graphics co-ordinate system and 
BLOCK uses pixels. The machine code 
invoked by BLOCK, however, offers a 
much faster route to the screen than 
does that for LINE, so it can be used as 
a very fast way of drawing horizontal or 
vertical lines. 

Another advantage is that the lines 
can be of any width. The accompany- 


| 100 REMark Window Editor 


ing Window Editor program uses 
BLOCK for the ‘window’ frames; LINE 
was too slow to be practical and would 
present co-ordinate system conversion 
difficulties, 

A little-known use of BLOCK is as an 
alternative to the versatile but slow 
RECOLOUR command. By selecting 
OVER -1 so that the block colour is 
XORed into the window contents and 
then drawing a block over all or part of 
the window, a very fast recolour is 
achieved. It can be entertaining trying 
to predict the resulting colours, 
especially if using INKs outside the 
range 0 to 7. The following short pro- 
gram provides a convincing demonst- 
ration of the speed of BLOCK — try 
doing the same with RECOLOUR: 

100 MODE 8: WINDOW 512,256,0,0 
110 PAPER 0: CLS 
120 x=112: y=66 


110 REMark James Lucy Tel 0621-891715 


130 PAPER O : BORDER : CLS 


135 inc=2 : s=10 : REMark set ink to red and speed to 10 
140 POKE 163976,0 : REMark caps lock off 


150 REPeat new box 


155 REMark Set up standard window: 


160 xs=448 : ys=200 : xo=32 : yorl6 3 box 


170 REPeat draw box 


180 key = CODEC(INKEY$(-1)) : REMark Wait for a key 


190 box : REMark Erase old box 


200 SELect ON key 
210 =102 
220 #115 


240 #216 
250 = #192 
260 =200 
265 REMark shift csr down: 


ts s=10 : REMark f ast, move in steps of 10 
t s™=l : REMark s low, move in steps of 1 

230 #208 : yosyo-s : IF yo< 0 : yo=0 : REMark csr up 
: yoryots : IF yotys > 256 : yo=yo-s : REMark csr down 
s xo™xo-s : IF xo< 0 : xo=m0 : REMark csr left 
§ xo=xo+s : IF xot+xs> 512 1 xo=xo-s : REMark csr right 


270 §=(=220 : yotyots : ys=ys-s : IF ys<¢2 : yoryo-s : ys=ysts 


275 REMark shift csr up: 


280 #212 : yowyo-s : ys=ysts : IF yo< 0 : yoryots : ys=ys-s 


285 REMark shift csr right: 


290 =204 : xo=xot+ts : xs=xs-s : IF xs<2 3 xo=xo-s 3 xs™xs+s 


295 REMark shift csr left: 


300 #196 : xo=xo-s : xs=xs+s 1: IF xo< 0 : xo=xo+s : xs=xs-s 
310 #121 : box : REMark ‘'y' for yes, so draw box 

320 CURSOR 0,100,x0,yo : PRINT xs!ys!xo!yo 

330 s=10 : incwinct+2 : IF inc=8 : inc=2 


340 NEXT new_box 
350 END SELect 


360 box : REMark Draw altered box 


370 END REPeat draw_box 
380 3: 

390 DEFine PROCedure box 
400 BLOCK xs,1,xo0,yo,inc 


410 BLOCK 1,ys-2,xo+xs-1,yo+l,inc 


420 BLOCK xs,1,x0,yotys-1l,inc 
430 BLOCK 1,ys-2,x0,yotl,inc 
440 END DEFine box 
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130 FORa=1T0 7: BLOCK 40,130, a 
x+40+(a-1),y,a aos 
140 OVER-1 ee 
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Some readers may have wondered 
about the windows used in some com- 
mercial programs which appear to 
stand out from the background. That is 
achieved by displaying a ‘shadow 
along two sides of the window using, 
of course, BLOCK. Try this to see the 
effect: 


100 MODE 4: WINDOW 512,256,0,0 
110 PAPER 4: CLS 
120 BLOCK 448,436,196,0 
130 BLOCK 4,176,480,20,0 
140 WINDOW 448,180,32,16 
150 PAPER 7: CLS 


The important point to note is that 
the BLOCKs are drawn before the win- 
dow is re-sized and so are immune to 
subsequent CLS, 


Window editor 
The Editor replaces the tedious trial 
and error method of arranging a 
number of windows on the screen. 
The cursor controls move a window 
‘frame’ round the screen; used in con- 
junction with the SHIFT key, they 
change the size of the window. Pres- 
sing f allows the window to be moved 
fast; press ‘s’ for slow adjustment. 
When satisfied with the window size 
and position, press ‘y’ for yes and the 
dimensions necessary for a WINDOW, 
SCR_ or CON_ command will appear 
in the top left-hand corner. The pro- 
cess can be repeated for as many win- 
dows as required. 
As well as being useful, the program 
demonstrates the speed of BLOCK for 
drawing lines, the power of OVER -1, 
the convenience of the SELect ON con- 
struct and a rather naughty little POKE 
for making sure the caps lock is off 
The program has been kept as short as 
possible and contains no on-screen 
help, to keep typing to the minimum. 
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TREMBPORT LTB, computer Accessories 









MAILING LIST 


This program will allow you to quickly store 
and retrieve names and addresses from within 
ARCHIVE. Features include single key functions, 
prints address labels, exports files to Quill for 
mailing list: also compatible with our stock- 
control file. 


£14.95 










== 
-slzs} STOCK CONTROL £14.95 


Keeps a complete record of all your stock 
items including retail price, trade price, 
minimum order level, items on order and many 
other features. 


Be QL APPOINTMENT/ 
DIARY £24.95 


Records appointments dates and times, can 
be used as diary dentist, doctors, hairdressers, 
service engineers. Program allows 26 users with 
up to 40 appointments per day. Features 
include search for day, search for next spare 
time, search for client's appointment, print out 
all day appointments and many others. 


QSPELL 














£19.95 


Spelling checker for Quill supplied with 25000 
words, checks on A4 page in 24 secs. users 
dictionary and auto learns words 





k PAYROLL £63.25 


Calculates weekly, monthly or 4 weekly payroll 
full fax calculations, coin analysis and 
payment rounding. 


INTEGRATED 
ACCOUNTS £89.95 


This new program from Sinclair will allow you to 
produce full profit and loss account 


ARCHIVE 


Our team of programmers are able to write 
programs to your requirements, phone for 
further details. 





© >= QL KEY DEFINER 


For those who use Quill or SUPERbasic this 
program is a must allowing you to define up to 
2k on each key i.e. simply press ALT and “S” and 
the program will be saved onto the microdrive 
and overwritten, press “ALT” and “P” to print 
current file, press ALT and “G” to go to top of 
file, ALT and “B’ to go to bottom of file, ALT and 
“D” will type in “Dear Sir’ You can type a 
complete paragraph, phrase or letter by 
pressing one key. 


In basic pressing F5 will bring back the last line 
typed; you can define keys for EDIT LIST etc 


QL CALC £9.95 


This program makes use of the QL’s multi tasking 
facility enabling you to press CTRL and any other 
key to give you a full calculator; having used the 
calculator you can return to the current program. 
This program can be used with Quill, Archive. 
Abacus and Easel. Features include mouse type 
operations, keyboard overide, memory and alll 
ea standard type features very useful in a busy 
Office. 


£9.95 















LEO 


TRANSFORM LTD 


24, West Oak, Beckenham, Kent BR3 2EZ 































QL SOFTWARE 


MULTI TASKING 


This program will allow users with extra memory 
to run QUILL, ARCHIVE, ABACUS and EASEL at 
the same time, or two ARCHIVE programs and 
QUILL. Pressing a key will allow you to suspend 
the current program and switch to the new 
program. 


RAM DISC 


Users with extra memory will with this software be 
able to set up a ram disc; programs can then 
be instantly saved and re-loaded. A printer 
spooler is also included to allow you to print 
whilst still using your Computer. 


£14.95 


£14.95 


it TOOL KIT £9.95 


This program will copy all or selected files, 
delete one or selected files, display file to 
screen, change file file name. format, and print 
multiple copies of Quill files. 


MEMORY EXTENSION 


MEMORY EXTENSIONS 





£125.00 


= 


QL VISION 
215.00 


PHILIPS 7502 


75.00 
Ex VAT 


Phillips 7502 


ex vat inc vat 
215.00 247.25 
75.00 86.25 


QL Vision 

Philips 7502 black and green 
Connect your Spectrum to 
the QL Vision Monitor 39.14 45.00 


Please add £5.75 for delivery of monitors 


CARTRIDGES 


10 CARTRIDGES 
17.50 


20 CARTRIDGES 
35.00 
Microdrive Cartridges £1.99 


Microdrive storage box with 10 cartridges 22.45 
Microdrive storage box with 20 cartridges 39.95 


Add £1.00 post 


PRINTERS 














DOT MATRIX Ex VAT Inc VAT 
Brother M1009 129.82 149.30 
Seikosha SP1000 179.00 202.40 
Epson LX80 199.00 228.85 
Taxan Kaga 250.00 287.50 
DAISY WHEEL 

Brother HR10 245.80 282.67 
Brother HR15 349.44 401.86 


Epson LX80 
199.00 Excl. VAT 


Please add £5.75 for delivery of printers. 


(By=\e) an @) 





























3¥2” DISKS 


SIDED 
DOUBLE 
DENSITY 


S 
—- 10 FOR £30.00 





Ex VAT Inc VAT 
6.00 6.90 
10.00 11.50 
26.04 29.95 


QL to Spectrum 
QL RS 232 
Centronics interface 


ACCESSORIES 


26.04 
10.90 


29.95 
11.50 
5:00. 5.75 

13.20 15.18 

18.00 20.70 
11.29 12.98 
5.78 6.65 
Microdrive cartridges 1.73. A99 
10x37 2” disc 26.08 30.00 

We also stock a wide range of ribbons, 

daisy wheels etc. 

Please add £3.00 for post and packing of 

paper. ©] for labels. 


DISK DRIVES 


rm 
| —~—. 


Centronics interface 

RS 232 lead 

Monochrome monitor lead 
M1009 tractor feed 

LX tractor feed 

2000 sheets of continuous paper 
1000 labels 


112.60 
152.17 
173.49 

72.413 


129.00 
175.00 
199.50 

82.95 


112.02 


Technology Research Delta 
Technology Research Delta 64 
Technology Research Delta 128 
Cumana interface 

720k single 3'2" drive 97.14 
1440k dual 3'>” drives 185.44 213.23 
Cumana interface + single drive 165.17" 189.95 
Cumana interface + dual drive 243.43 279.95 


31%” DISK BOX 


Holds 40 disks 
Lockable 
Tinted removable lid 


HOLDS 40 312 DISKS 
Add £1.00 post 
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W. Patrick O'Reilly documents his 
experience of using Quill to produce 
technical manuals. 


In the last 18 months I have written a number of full 


length books and technical manuals using Quill and I - 


have learned some tricks which help me to get the best 
from the system; some of the most useful ones for 
large document work are outlined. 


Building a workable system 
First, if you are to use any word processor for more 
than an hour or so per day you will have to invest in 
some good-quality peripherals. Fortunately the QL is 
better-served than almost any machine in the serious 
home user field with a range of products which pro- 
vide professional performance at very reasonable 
prices. 

Most of us find it necessary to develop our computer 
systems in stages and the QL provides an ideal basis for 
that. Peripherals can be added as need arises and the 
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budget permits. It is possible to start, at least, with just 
a TV and the QL plus its bundled software. Some of my 
friends who are writers rent a matrix printer for one 
day per month. At a cost of around &3, that represents 
excellent value, especially as the printer ribbon is 
almost worn out by the end of the rental period. 

My system, built over the last year or so, consists of: 
QL, upgraded by Sinclair to Ver$ = JS; Microvitec Cub 
653 colour monitor; Psion suite version 2.0 — replace- 
ment for version 1.0; PCML 256K RAM with toolkit 
commands and RAM disc; Juki 6100 daisywheel printer 
for camera-ready copy; Epson LX-80 dot matrix printer 
for rapid drafts — and graphics from Easel. 

Of those I would say the monitor is essential, 
although for word processing alone a green screen 
monitor would be just as good. The Cub is superb and 
gives an absolutely rock-steady image. 

Many publishers ask specifically for letter-quality 
typescripts, even though in most cases they will re-set 
the type rather than use it directly. Some of the near 
letter quality matrix printers are very good and would 
certainly be acceptable for that purpose. I have yet to 
see one, however, which approaches anything near to 


Ka: 


LL 7 
24 ¢f7 


hfe 
cA PIP! 7 s 


¢ 


ee op 


~ 
mY 
BN 


NAMUS pos 
Se 


= 


~ 
SST 
4 < 4 


the performance of a top-quality daisywheel, which 
can be used as a means of creating camera-ready copy. 
In that respect the Juki is a superb printer, although at 
fewer than 20 characters per second it takes a very long 
time to print-out a 400-page document. That is why | 
use a matrix printer for first drafts as, no matter how 
thoroughly I check from the screen, I find there are 
always a few typing errors which are found only when 
checking hard copy. The most common error is 
caused by the tendency of the QL to produce double 
letters if, like me, you hit keys off-centre occasionally 
and create an input from an adjacent key. 

The published printer drivers for the Juki provide 
most of the facilities I need, but not all. I do not know 
why the printer reviews seem to be incorrect but if you 
want on occasion to use such facilities as subscripted 
and superscripted characters and to retain correct 
line-spacing, table one contains data which really 
works, 

Installation is easy. Simply run the INSTALL_BAS 
program and call up the Diablo printer data. Then 
make the few changes indicated in the table. Install the 
printer as Juki, in case you want to use the Diablo 
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driver at a later date. I have assumed you are using the 
serial interface at 300 baud and are printing to single 
sheet rather than continuous forms stationery. 

From my Quill copy cartridge I strip off all but the 
essential information. That means that my working 
Microdrive only holds the — modified, see later — 
BOOT program, the Quill code and the data file 
PRINTER_DAT set to suit the printer I am using. 
Equally; when formatting a RAM disc to hold that soft- 
ware I need only 110 sectors, not the 200 which would 
be necessary if I kept the help file and installation 
program in memory. I am assuming, of course, that 
you will dispense with the help file only when you are 
confident that you can put Quill through its paces 
unaided. 

All this means more working space for your large 
documents. Also, of course, a few useful utilities, such 
as plotter drivers and the like, or a spare copy of Easel 
and its re-named boot program can be crammed on to 
your Quill copy Microdrive in the interests of 
economy. 
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The extra RAM — it need not necessarily be a RAM disc 
system — is of tremendous benefit and I would 
strongly recommend such an upgrade to anyone using 
the QL, with or without floppy discs. It is not that the 
Microdrives are particularly unreliable —I have found 
them similar in failure rate to floppy disc systems — 
namely unacceptable, that is, if your document is to be 
lost in the event of a drive error. It is very rare, how- 
ever, that I create documents smaller than the 800 to 
1,200-word limit which the basic QL/Quill system can 
handle without using edit files, and the machine is 
unusable for far too long during Microdrive opera- 
tions. 

With 256K of extra RAM I could write a 20,000-word 
chapter without using Microdrives. I do not, however, 
for one very good reason — if there were a mains 
failure I would lose everything and no doubt also my 
mind. What the extra RAM means is that I can save 
regularly to Microdrive, confident that if the save is 
unsuccessful — bad or changed medium. I will get 
the “same document?” prompt from Quill and, on 


pressing ENTER, my working copy is still there. All I 
need to do is to re-try the save with a new cartridge. 

Incidentally, the diagnostic “file /O incomplete" 
will be displayed if you try to save a file to a medium — 
mdv or RAM Disc — which has unsufficient space for 
the document. Do not panic; provided you are not 
using the medium for an edit file you can change the 
Microdrive cartridge, or call up another RAM disc, and 
then save to that. 


When I buy Microdrives — I prefer the “book- 
shaped” boxes of four — I format each one six times 
before use. Any which fail to format up to within one or 
two sectors of their maximum capacity —i.e,, ifthe for- 
mat command eventually receives a response such as 
109/115 — are likely to fail early in their working life 
so I do not accept them. It could be that the oxide coat- 
ing is thin over a small region or that the tape has 
become stretched locally. Either way, Qdos will mark 
those sectors and subsequently avoid using them. The 
trouble is that immediately adjacent sectors may be 
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marginal; a little wear due to friction and they, too, 
might fail, with serious if not disastrous results, 

There are cartridge “doctor” programs available for 
the QL and no doubt the “bad or changed medium” 
report is less worrying if you have one of them and can 
drive it. Here are two tricks which may help you 
recover some of your lost Quill files provided the 
directory of your cartridge is not corrupted: 

Ifa file fails to load into Quill from mdvy2_, try load- 
ing the same file from mdv1_. On more than one occa- 
sion I have recovered a file that way. Remember to save 
toa fresh cartridge, of course. 

Load Quill and set up a page format with margins as 
you require them. Then use the merge command F3, 0 
(for ‘Other commands’), M (for Merge’), and then 
the drive reference and your lost file name followed by 
ENTER. 

Quill will merge your file into the blank format up to 
the point where the data corruption occurs. You will 
get the diagnostic ‘merge failed’ but with luck you 
should then have in RAM a sizeable portion — some- 
times all — of your lost file. 

Not quite so useful, admittedly, but generally you 
can also print the leading good portion of a ‘file I/O 
incomplete’ corrupted file rather than lose it 
altogether. Hard copy may be better than nothing, 


A way of working 

For each document I create I keep two current copies 
on Microdrive as a matter of course. It is tiresome but 
experience has taught me that peaee of mind is worth 
a great deal. 

Back-up copies are best made by using the SAVE 
command ifat all possible. The trouble with the BACK- 
UP command and the operating system COPY mdv2_ 
...tomdvl_... is that in many cases the system does 
not mind if you ask it to copy a corrupted file; it will do 
so satisfactorily. When you find your master copy has 
failed to load with the diagnostic report ‘not a QUILL 
file’ or ‘file /O incomplete’ you will be upset to dis- 
cover you have an identical file on your back-up car- 
tridge and it gets an identical report from Quill. 

That is where RAM discs are particularly handy, 
since once you have set up your system in the morning 
you can keep two cartridges in mdv1 and mdv2 and 
save periodically to them both in turn. When a car- 
tridge is full I always re-format it and write out any 
worn sectors — admittedly a rare occurrence if you 
insist on cartridges which format fully in the first 
instance — before doing a final save on to the car- 
tridge. 

I have modified the boot program for RAM disc 
operation. Quill is put into ram1_ and any text files 
into ram2_, using the wild-card copy facility in the tool- 
kit, before the ‘ram’s are used as ‘mdv’s. The program 
‘q is used to start Quill from RAM disc. 

There is no confusion about which is the latest ver- 
sion of any of my document files, because they are all 
dated. That information is stored on the directory of 
the drive — including the RAM discs — and can be 
interrogated using the toolkit extension command: 


wstat mdv2_ or wstat ram2_ 
Not only is the size (in sectors) of each file displayed, 
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but also the date and time of its last copy to that 
medium. 


File size 

Even with a disc system it is unlikely that you will be 
able to store a complete book as a single file, and it 
would be a rather silly thing to do in any case, Gener- 
ally I find a chapter of twenty or thirty A4 pages (single- 
spaced) is a sensible maximum size. As supplied, 
QUILL 2.0 will not handle documents as large as this, 
but Psion have provided a ‘patch’ to allow QL Quill 
documents of more than 15 pages. 


SETTING UP THE JUK! 6100 
PRINTER DRIVER 
The main DIP switches on the JUKI 
should be set as follows (cut sheet 
paper assumed): 


Automatic line feed 

Printing impression level (high = ON) 
Host computer (ON = IBM PC) 

) 


>) ITALIAN character set 
) 


Paper type (ON = cut sheet) 

Form length (ON = 12 inches) 

Line spacing (OFF = 1/4, ON = 1/8 inch) 
UNUSED 


-¥DONGCUPUWUNYS 


Using PSION’s program INSTALL_BAS 
edit the DIABLO printer driver to read: 


:JUKI 
:seri 
2300 


DRIVER NAME 
PORT 

BAUD RATE 
PARITY :even 

LINES/PAGE 3:72 (for 12 inch paper) 
CHAR/LINE 7:80 

CONTINUOUS FORMS ne 

END OF LINE 
PREAMBLE CODE 


sCR,LF 

:CR,ESC,HT,NUL,ESC,9 
(sets carriage “home" to LHS) 

znone 

:ESC,W 


POSTAMBLE CODE 
BOLD ON 

BOLD OFF 
UNDERLINE ON 
UNDERLINE OFF 
SUBSCRIPT ON 
SUBSCRIPT -OFF 
SUPERSCRIPT ON 
SUPERSCRIPT OFF 
TRANSLATE 1 


:ESC,%& 

:ESC,E 

sESC,R 
:ESC,RS,ACK,U,ESC,RS,BS 
:ESC,RS,ACK,D,ESC,RS,BS 
:ESC,RS,ACK,D,ESC,RS,BS 
:ESC,RS,ACK,U,ESC,RS,BS 
:£,4% 


To modify your Quill Version 2.0 load the boot 
program and list it. For RAM Disc operation the ‘scr’s in 
line 9 have been changed to ‘con’s (which won'tin any 
way affect operation directly from microdrives). Now 
type in the additional lines of program listed in Table 
4 and run it with your Quill copy in mdv1. N.B. Make 
sure your cartridge is not write protected; the plastic 
protection nib on the side of the cartridge should not 
have been removed. (If it is missing you can easily 
override the protection using a piece of Selotape.) 

(N.B. If you wish to save this as your Boot program, 
lines 10 and higher should be deleted after you have 
run it for the first time, as these contain instructions for 
permanently modifying the Quill code and only need 
executing once.) 

Hang-ups 

Unless your mains supply is really steady and free from 
transients you may find that your QL freezes-up occa- 
sionally. The processor is not damaged in any way — 
it just becomes very introverted, ignoring any attempts 
you might make from the keyboard to stimulate it into 
visible activity. If you are using Quill at the time the 
cursor will freeze or disappear and anything created 
since your last SAVE will be lost irretrievably. 

If that has never happened to you and you would 
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like to know what it feels like, try holding down the 
keys CONTROL and ALT and pressing 7. simultane- 
ously. The re-set your QL; as I was saying, it is not pleas- 
ant. 

Mains filters are available from a number of 
suppliers and with your QL supplied via one of them 
crashes will be far less likely. No computer system is 
100 percent perfect, however, and there are a few 
things which you can do to increase dramatically the 
chances of a crash when using Quill version 2.0. I list 
some of the situations which on occasion in the last 18 
months have caused me repeated problems: 

Scrolling backwards through a document, which 
one often wants to do when editing. No doubt for 
some very good reasons, Quill takes a little longer to 
scan backwards through a file than it does in the for- 
ward direction, and on several occasions the cursor 
has wandered out of control before disappearing. Iam 
still caught by that occasionally but the pain can be 
minimised by making a SAVE to Microdrive before 
scrolling backwards. 

If the top line of a document is written in bold face 
Ican sometimes crash the system if] use the line delete 
keys — CONTROL and CURSOR DOWN — to take out 
the heading. That is avoided easily; insert the new 
heading before deleting the old one. 

Merging a large file into the beginning of another 
file can be fatal. That can be overcome by saving the 
current file, loading the merge file, and using GOTO to 
set the cursor at the bottom of that file; then merge the 
former current file. 

Since those problems occur sometimes but not 
always, they are very difficult to track. Psion has not 
been able to solve them and so I have learned to live 
with them. Overall, I believe Quill on the QL is a 
superb word processing system. I like the on-screen 
formatting very much and the absence of embedded 
commands for typeface changes. 


A wish list 

There are a few extras which I would hope Psion will 
be able to provide in a Version 3 — perhaps for next 
Christmas? The most useful to me would certainly 
include: 

A facility to print-out documents as a background 
task while continuing to use the word processor. 
Unlike most low-cost microcomputers, the QL is 
multi-tasking, so that must be possible and, indeed, a 
spooling command is included with the PCML RAM 
extension | use, so I can do that when working in Basic. 

A facility to mark a block of text and write it to a file 
— or, even better, to merge a marked block of text 
from one file into another. 

The ability to select from at least two printer drivers 
without having to return to Basic and run the install 
program. 

A facility for writing different headers to odd- and 
even-numbered pages. 

Details of a patch which would load Quill with its 
prompts window off instead of on would be a useful 
time-saver. 

During 1985 my QL, Quill and I have clocked more 
than 1,000 A4 pages of single-spaced text. I think the 
system works. 
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Our LISP tutorial 


continues with a guide — 


to using functions to 
manipulate last 
month's data lists. 
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and how data lists are stored were dealt with 

last month but those data structures are 
relatively useless without functions to operate on them. 

The three primary functions are CAR, CDR and 

CONS, which we have already studied, but the majority 
of LISP implementations will have many more functions 
built in, as standard. One common function is PLUS, 
which is equivalent to the Basic ‘+’ operator. A typical 
PLUS function might look like: 


(PLUS 1 2 3 (PLUS 4 5)) 


which would return the answer 15 — 1.€., 
1+2+3+4+4+5. It is important to note that PLUS can 
take any number of arguments. Alternatively, 
DIFFERENCE, which is the subtract function, must have 
exactly two arguments, such as 


(DIFFERENCE 33 22) 


which will give the answer 11 —1.e., 33-22. Of 
course, there is no reason why one of the arguments 
should not contain a function, so 


(DIFFERENCE 33 (PLUS 8 14)) 


could also be used. 

Other common arithmetic operations are TIMES, 
taking any number of arguments, and QUOTIENT, 
which expects two arguments and will perform an 
integer division. So 
(TIMES 2 3 -4) 
will give the answer —24 —i.e., 2°3*—4, whereas 
(QUOTIENT 33 5) 


will give the answer six. That is similar to DIV on the QL, 


T he basic principles behind the language LISP 


rather than the ‘/’ (divide) symbol. A related function, 
which performs the MOD operation, is REMAINDER. 
Thus 


(REMAINDER 33 5) 


returns the answer 3. 

That is all very well but it scarcely helps us to write 
programs. We need to be able to define our own 
functions. That is done, believe it or not, with a 
function. The function is called DEFUN, which takes the 
form: 

(DEFUN Function_name Parameters Function_body) 


A typical, though rather contrived, example of that 
might be: 


(DEFUN TIMESS (X) (TIMES & X)) 


That very simple function will take its argument, X, 
and multiply it by eight, using the built-in TIMES 
function. From then, we can write such things as: 


(SETQ Y (TIMES8 5)) 


which will assign 40 — i.e., 8*5 — to the variable Y; 
remember SETQ performs the assignment. 


Conditions and decisions 

Now that we have seen how to define a simple 
function, we look at a very important built-in function, 
known as COND. 

Basic would be an extremely tedious language 
without the IF... THEN statement. That is the condition 
which gives programs so much flexibility, by allowing 
them to make decisions based on previous events. Try 
to imagine a program without at least one such 
Statement. In Lisp, the operation is performed by the 
function COND, which has the form: 
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(COND (test#1 action#1) 
(test#2 action#2) 
(test#3 action#3) 
hess need 
ay ai 
(test#N action#N)) 

You will notice that this function is split over a 
number of lines. Don’t worry about that, because 
Carriage returns have no significance — it is the 
brackets which count. 

Brackets can become prolific in more complex LISP 
functions and are often difficult to keep track of. You 
can alleviate that problem by using a sensible layout, 
such as that shown. In addition, many implementations 
offer some form of tracking aid. For instance, when 
using Metacomco Lisp, the number of angled bracket 
(‘>’) prompts on each line correspond to the number 
of outstanding brackets. The COND function is similar 
to the Basic statements: 


IF test#1 THEN 

action# 1 
ELSE IF test#2 THEN 

action#2 
ELSE IF test#3 THEN 

action#3 
FPSB 6. 
... FF test##N THEN 

actionz##N 
ENDIF 

Thus, COND will work through the tests, in order, 

until a non-NIL value is encountered. That is considered 
to be True and the appropriate action is taken. LISP 
then exits from the COND statement. If none of the 
tests is true, no.action is performed and the COND 
statement returns the value NIL —i.e., False. Rather 
than the TRUE and FALSE found in many languages, 
the two boolean values in LISP are known as T and NIL: 
F may also be used in the Metacomco version of the 
language. Consequently, acommon form of the COND 
Statement is: 


(COND (test#1 action# 1) 
(test#2 action#2) 
(test#3 action#3) 
‘ts oe 
(test#N action#N) 
(T end_action)) 


since ‘T’ will always be true, the end action will be 
performed if all the other tests fail. That is akin to the 
ON REMAINDER statement which is part of the SELect 
. .END SELect condition in SuperBasic. 

A simple example will help to show how COND 
works. A very useful function found in most languages 
is ABS, which returns the ABSolute value of its single 
argument. That function is easily added to LISP as: 


(DEFUN ABS (xX) 
(COND ((MINUSP.X) (MINUS X)) 
(T x )) 


We have had to use two new built-in functions here. 
MINUSP requires one argument and will return ‘T’ 
(True) if the argument is negative and NIL otherwise. 
50, if ‘X’ is negative; then the MINUS function returns 
the result of COND. As you might expect, MINUS 
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negates its argument, so it will return the positive 
equivalent of ‘X’. Finally, the second test is always True 
and returns the value ‘X’. If we did not include it, any 
positive arguments would be returned as NIL, because 
the COND statement would fail to find a test which is 
True. 

There are a number of test functions, returning 
boolean values, based on their argument(s). Figure one 
lists them and their usage. 


Looping the loop 
Another very common construct, invaluable in Basic, is 
the loop. It is usually formed by the FOR . . ENDFOR 


loop but a much more versatile loop format, available in 


SuperBasic, is the REPEAT . . UNTIL, or REPEAT. . 
WHILE. Using SuperBasic, the UNTIL is performed by a 
normal condition within the REPEAT . . ENDREPEAT 


section, which will EXIT the loop. LISP has a similar loop 


construct, of the form: 
(LOOP action? action2 . . .) 


One of those actions usually will be either the UNTIL 
or the WHILE function, which will allow the loop to 
terminate. We can look at the operation of the loop 
through a simple example. We will try to define a 
function which will add a list of numbers and return the 
total as the result. Working from the function definition, 
we would get something like: 


(DEFUN ADDUP (1st (tot) 
function_body) 


Here, we are Calling the function ‘ADDUP’ and it 
takes one parameter which we will identify as ‘1st’. 
The ‘tot’ parameter is optional because it is placed 
inside a further set of brackets. In that case, ‘tot’ will be 
a local — to the function — variable, which we will use 
to hold the total sum at each stage. Consequently, the 
first statement of our program should zero that total. 
Our function will now look like: 


(DEFUN ADDUP (1st (tot) 
(SETQ tot 0) 
function_body) 


The next stage is to add a loop which will add all the 
numbers. To do that, we will do the following at each 
stage: 

a, add the first item in the list to ‘tot’; b, ignore the 
first item in the list from now on; c, stop when there are 
no more items left in the list. 

Looking at the last first, it can be written as an UNTIL 
function, which will terminate the LOOP when the list is 
equivalent to the empty list. Looking at the conditional 
functions in figure one, we find that NULL will perform 
that activity, so the terminating condition will look like: 


(UNTIL (NULL 1st) tot) 


Putting the ‘tot’ at the end will ensure that that value 
is returned when the loop terminates. Then (a) will be a 
Statement of the form: 


(SETQ tot (PLUS tot (CAR tot))) 
and (b) will be: 
(SETQ 1st (CDR 1st) 


We can then write our entire function, which will 
look like: 





47 


48 


FIGURE 1. 


(AND arg1 arg2.. .) 
AND can take any number of 
arguments, and will return T (in this 
case the last argument) only if all the 
arguments are non-NiL, otherwise 
NIL is returned. AND evaluates its 
arguments in order, terminating 
with a NIL value, or the end of the 
list, so it will not necessarily 
evaluate all of its arguments. 
(ATOM arg) 
Will return T is its argument is an 
atom. This is an identifier, number, 
or machine code entry-point. 
(CHARP arg) 
Will return T if its argument is an 
identifier. 
(DIGIT arg) 
Will return T if its argument is a 
single character digit. 





(EQ arg! arg2) 
This will return the value T if ‘arg1’ 
and ‘arg2’ are the same. This is the 
case if they are the same identifier, 
equal numbers or identical lists. In 
the latter case, the list identifiers 
must literally point to the same list in 
memory, not merely different lists 
with the same contents. 


(EQUAL arg1 arg2) 
This is similar to EQ, but is often 
more useful when the arguments 
are lists. EQUAL will compare all the 
elements of its arguments, so two 
lists with the same structure and 


(LESSP arg1 arg2) 
Returns T is ‘arg1’ is less than 
‘arg2’. 
(LISTP arg) 
This will return the value T if its 
argument is a list, or dotted pair. 
This is the exact opposite of the 
conditional function ATOM. 


(MEMBER arg1 arg2) 
This function will search ‘arg2’ for 
an occurance of ‘arg1’, returning 
the remainder of ‘arg2’, starting 
with the first occurance of ‘arg1’. If 
‘arg1’ does not occur within ‘arg2’, 
then the function returns NIL. 


Both of these functions will return T 
if their argument if NIL, and NIL 
otherwise. 

(NUMBERP arg) 
This function will return T if its 

argument is a number. 

(ONEP arg) 
Returns T if its argument is the 
number one. In other words (EQ arg 
1). 

(OR arg1 arg2...) 
The logical-OR function will evaluate 
its arguments in order, returning T 
(the first non-NIL argument) if at 
least one argument is non-NIL, 
otherwise NIL is returned. 


values will give the result T. 


(GREATERP arg1 arg2) 
Returns T if ‘arg1’ is greater than 
‘arg2’. 


(MINUSP arg) 


negative number. 





(DEFUN ADDUP (1st (tot) 
(SETQ tot 0) 
(LOOP (UNTIL (NULL 1st) tot) 
(SETQ tot (PLUS tot (CAR 1st))) 
(SETQ 1st (CDR 1st) 
) 
We could then call this function, just as any other in 
LISP. For example: 


(ADDUP (1 3-5 7 2) 


would return the answer eight. 


Recursion 

Though found in many LISP implementations, LOOP is 
not a standard LISP construct. In most cases, recursion 
is more versatile and requires less code for loop 
operations. To see how it works, let us code the 
foregoing function in a recursive manner. The final 
definition would be along the lines of: 


(DEFUN ADDUP (1st) 
(COND ((NULL 1st) 0) 
fa, (PLUS (CAR 1st) 
(ADDUP (CDR 1st)))) 
) 


That is obviously a far more elegant solution to the 
problem. Effectively, if the COND finds that the end of 
the list has been reached it returns the answer zero. 
Otherwise the T always gives true, so the first item of 
the list (CAR 1st) is added to all the remaining items. To 
find the sum of the remaining items, the function 


: ADDUP, which we have just defined, is called. 


If you find recursion confusing, try imagining what is 
happening in terms of the structure diagrams 
developed last month. In general, it is usually not a 
good idea to think too carefully about how recursion 
works. Just regard it on a superficial level and assume 


_ that everything will do what you want it to do. 


As a final example of the power of recursive 


— functions, let us try to write the EQUAL function, as 
— described in figure one. That function must be able to 


handle large lists, if necessary, checking all the values 
and the structure of each list to ensure they are the 
same. 

Let us assume that the two arguments are known as 


Returns T if its argument is a 


(NOT arg) or (NULL arg) 


(ZEROP arg) 
Similar to ONEP, this will return T if 
its argument is zero. In other words 
(EQ arg 0). 


‘arg!’ and ‘arg2’. There are anumber of conditions for 
which we need to check. First, if (EQ arg1 arg2) is true, 
then an EQUAL function should immediately return 
true, because either the two arguments are the same 
identifier, same number or identical lists in memory. 
The code for this will be: 


(EQ arg? arg2) T) 


lf that test fails, and yet one of the two arguments is 
an ATOM, the test obviously has failed and EQUAL 
should return NIL. That is again easily checked for with 
the function: 


(OR (ATOM arg1) (ATOM arg2) NIL) 


We need not worry about both arguments being 
atoms. If that were the case, and they were the same 
the EQ function would have been true. Otherwise we 
want to return NIL, so everything is satisfactory. 

Now for the tricky portion. We know that both the 
arguments are lists, and we know that the lists are not 
identical in memory, but we have no idea what the list 
structure looks like. One thing we know is that, 
because both arguments are lists, they must have a 
CAR and CDR argument, even if the CDR argument Is 
NIL. 

So all we really need to do is to find independently 
whether the CAR and CDR elements of each list are 
equal (EQUAL). Using the power of recursion, we can 
call the EQUAL function which we have not even 
finished writing. The final version of this function looks 
something like: 


(DEFUN EQUAL (arg? arg2) 
(COND ((EQ arg? arg2) T) 
(OR (ATOM arg?) (ATOM arg2)) NIL) 
(EQUAL (CAR arg1) (CAR arg2)) 
EQUAL (CDR arg1) (CDR arg2))) 


(T NIL) 


NS 


By now, you should be able to appreciate the 
subtlety and power of LISP. Next month, we will 
develop a complete worked example of how LISP can 
solve a more complex problem and introduce a few 
more important functions. 
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EIDERSOFT DISK SYSTEMS 


AVAILABLE NOW EX-STOCK 





=n § CREDIT CARDS 


TEL: 0708 851099 


[. IC. E. ALL disk 


systems include ICE 
ROM software with 
CHOice see our other 
advert. IF YOU 
ALREADY HAVE ICE 
WE WILL REFUND THE 
DIFFERENCE!! 


SYSTEM 11H 
f 40 Q 128K extra RAM/Disk 


interface. Parallel printer port. 
Inc VAT All accessories. Twin 720K 
3.5 inch disk drives as shown. 


SYSTEM 2 ecm. 
f449 256K extra RAM/Disk 


interface. Toolkit commands. 
Inc VAT All accessories. Twin 3.5 inch 
disk drives as shown. 


IMPACCT : IMPACCT 
SALES LEDGER PURCHASE LEDGER 


* Add/change/enquiry 

* Customer file 

* Delivery address 

* Cash/cheque receipt 
and matching 

* Cash sales (shop) and 





éQL BUSINESS PACKS. 
= Special offers on disk business 
® software for all Eidersoft disk 


= customers eg. 

= OSPELL 3.5” disk £19.95 

: IMPACCT int. accounts £129.95 
SAVE £50! 


: Many more special offers 








* Add/change/enquire 

* Suppliers file 

* Cash/cheque receipt 
and matching 

* Record p.cash 
purchases and refunds 


refunds * Invoice/credit note 
* Invoice/credit note entry 

production * Supplier outstanding 
* Statements invoices 


* Creditors report 
* Monthly transactions 


* Debtors report 
* Monthly transactions 


audit trial audit trial 
* Customer turnover rep. * Suppliers turnover 
* VAT report report 


* Analysis report by 
nominal codes 


IMPACCT 
NOMINAL LEDGER 


* List accounts 

* Journal entries and 
listing 

* Trial balance 

* Profit and loss report 

* Balance sheet 

* Budget entry 

* Comparative budgets 

* Interface and update 
from sales & purchase 
ledgers - 





IMPACCT 
STOCK CONTROL 


* Add/change/enquire 

* Record sales turnover 
rep. 

* Record purchases 
turnover rep. 

* Adjust stock level 

* Selling price list 

* Quantities on hand rep. 

* Stock valuation 

* Re-order level 

* FIFO turnover eng. 


Each module £49.95 + £1 P&P Total package £179.95 
+ £1.50 P&P. Microdrive 3.5” disk versions 
add £4 per module. 
Each module includes a full manual — Telephone support available 
Training courses avalable 
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Eidersoft reserve the right to alter prices and specifications without prior notice. 
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Mitsubishi 
Slimline * 







Finish silk black/quad disks available (P.O.A.)/ single 
upgradable disk with any system deduct £50. 


Eidersoft Business Software 


ARCHIVER £18.95+£1 p&p 

Adaptable business programs for 

PSION Archive version 2 plus: — 

Invoicing/Stock Control/Mailing/ 

Appointments. 

QSPELL £19.95+£1 p&p 

The award winning spelling 

Aor and word data base for 
uill. 








Fad 2 Bw eee or 
SYSTEMS & SOFTWARE 


Disk/Software Telephone Support 
Service P.O.A. 

DISK DRIVES DELIVERY 
SECURICOR £9 





. Eidersoft are pleased to announce exclusive 
L* distribution of the Xpert IMPACCT QL 
IMPACCT SOFTWARE integrated accounts system. 


At last a truly integrated QL accounts package that has 
all the features of packages costing 3 or 4 times the 
price! IMPACCT accounts includes invoicing/sales 
ledger — nominal ledger — purchase ledger and FIFO 
stock control. Each module is available separately or as 
a package. 

* *& Fully approved by chartered accountants * * 

* *can be integrated to PSION packages * * 





Dealers please phone us for more information. 


Eidersoft, The Office, Hall Farm, North Ockendon, Upminster, 
Essex RM14 30H. 
Please supply the following items: — 
EG UBLONN DP sc citeiircsded codsowanee £409.00 + £9.00 P&P 


DISK: SVStOM) 2 nse ccslvescsevseawcesace £449.00 + £9.00 P&P 
IMPACCT Sales Ledger ........./... £49.95 + £1.50 P&P 


C] 
[a 
O 
CL} IMPACCT Purchase Ledger ........ £49.95 + £1.50P&P 
L) IMPACCT Nominal Ledger ......... £49.95 + £1.50 P&P 
[] IMPACCT Stock Control ............ £49.95 + £1.50 P&P 
L] IMPACCT Complete System ...... £179.95 + £1.50 P&P 
dw ARCNAIIE aco Cacvenepuccasiscteamecsesueans £18.95 + £1.00 P&P 
Ch RIOD ona caansnanaaaaecaeisonseneccteae £19.95 + £1.00 P&P 


*EUROPOST £2.00 WORLD £3.00 
Please deduct my Access/Visa/American Expres$ 


wit Lr ga a 
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If you’ve a program that is worthy of consideration, send it to ‘The Progs’, Sinclair 
QL World, 79-80 Petty France, London SW1. We pay for everything published at the 


usual page rates. 


FCOPY — Pt 2 
Rob Sherratt 


As promised in the March issue, here is 
the second section of Rob Sherratt's 
fast copy utility for the QL. The final 
part will appear in the June issue. The 
machine code is in the form of a well 
commented source file so you should 
have few problems in discovering how 


TTL SPOOL ; FAST DATA TRANSFER PROSRAM 


SPOOL : FAST DATA TRANSFER PROGRAM 


Author +: Rob Sherratt 
Date : 19th Sept 1984 
Version : 1.8 


a ee ee ee ee ee 


Description : 


a) 


detected or the current job is killed. 


for the amount of GL memory spare). 


off by Superbasic have now completed. 


a ee ee ee ee ee ee ee ee 


Load / Installation Instructions : 


+ 


Allocate some resident orocedure space, 
\eust only ever be done when no aachine 
18 a = RESPR (512) 


2@  LBYTES edvi_spool code,a 
380s CALL a 


Cn ee ee ee i ol 


Ps) 


count = NUM_JOBS 

OPEN_IN #4,"advi_filea” 
OPEN NEW #5,"adv2_ filed" 
SPOOL #4 10 #5 


... have to wait until SPOOL jobs have 


se ol 


REPeat wait_loop 


50 


it works. 

If you do not have an assembler, or 
simply cannot wait until next month, 
you can obtain a copy of the program 
from the Microdrive Exchange. See 
page 59 for details. 


Copies from @channel_a to #channel_b until either EOF on achannel_a is 


The code is re-entrant and a new 


SPL_JOB can be started before a previous one has finished. There is no 
linit to the number of SPL_JOB tasks that can run at any one tise {except 


There are 2 new commands added to SUPERBASIC : SPOOL and SPOOL_N. SPOOL is 
used for file to file duplication operations, whereas SPOOL_N transters 
data only, and does not copy file headers. Also ! new function is addded, 
called NUM JOBS which returns the nuaber of machine code jobs presently 
owned by Superbasic. A returned value of @ indicates that any jobs started 


load the procedure and then call 


the procedure start address (to link it into SUPERBASIC). Note that this 


code jobs are being “execed". 


(note that this can only be done... 


. when the QL is first powered up) 


(causes spool_code to install itself) 


Example Showing a Fast File Transfer From Superbasic : 


(fetch number of machine code jobs) 
(for console or ser! etc) 

{or screen or ser? etc) 

(copy data in background) 


finished before closing files .. 








SE, A eo en ne oe ee en es oe on os eo) 


jobid Eg ' 
code sp E@U 14 
data sp QU 126 
buffer sp EQU 64 
priority EU $1F 
55 


t 


% 


err_ef  EQU -18 
err bp QU =f 


t 


t 


jb. d2 EQU $28 
jb a® QU $42 
jb al —-EQU $44 
jb a2 EQU $49 
jb ab = EQU $58 
t 


t 


trap! EQU 
trap2 EQU 
trao3 EGU 
trap4 EQU 
veal] EQU 


t 


t 


mt_cjob &QU $81 
at_jinf EQU $82 
at_frjob FOU $85 
at activ EQU $04 
et prior EQU $68 


% 


$ 


io-open EQU 1 
io close EQ@U 2 


t 


IF NUN_JOBS = count THEN EXIT wait_loop 
END REPeat wait_loop 


... the 1/0 channels can now be safely closed ... 


CLOSE #4 
CLOSE #5 


(must ensure that SPOOL has finished .. 
»» Operating first) 


-+. the example above will do the equivalent of the COPY command ... 


COPY advil filea TO adv2_fileb 


. except that control will be returned to SUPERBASIC during the SPOOL 
operation, whereas the COPY command hoos all the execution time, and BASIC 
is held up until the copy has completed. Also SPOOL allows us to open a 
number of files for reading on one drive, then open files for writing on 
another drive, then copy the data - results in efficient microdrive file 
transfers, and the potential for rapid cartridge duplication {see the 
SUPERBASIC program called BACKUP_BAS written by Rob Sherratt). 


EQUATES AND OTHER DEFINITIONS 


Progras specific equate values 


Force SPL_JOB to be independent 

Code space for SPL_JOB identification 
Buffer and stack space for SPL_JOB 
File buffer space for SPL JOB 

Job priority just less than BASIC 

EQU $2808 Supervisor status bit 
BDOS error numbers 


End of file 
Bad Parameter 


Job Header and Save Area Offsets 


area for register D2 
area for register Aa 
area for register Al 
area for register A2 
area for register Aé 


Equates for use with the @D0S macro 


Trap 1 parameter 

Trap 2 parameter 

Trap 3 parameter 

Trap 4 parameter 
Vector call parameter 
BDOS trap keys - Nanager Trap 

Create a new job 

Get information on a job 
Force resove a job 
Activate a created job 
Changes job priority 


QDOS trap #2 DB keys - 10 Subsystem 


Dpoen channel 
Close channel 


QD0S trap #2 D3 keys - 10 Subsystem 
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io share EQU | Open old (shared) file 

io new EQU 2 Open new (exclusive) file 

‘ 

2 

* QD0S tran #3 D8 keys - I0 Subsysten 

a 

io fstrg EGU 3 Fetch a string of bytes 

io_sstrg EGU 7 Send a string of bytes 

* 

* QD0S trap #3 DB keys - File Handling Subsysten 

t 

fs fiush EQU $4} Flush output file’s buffers 

fs heads EQU $46 Write 14 bytes of the file header 

fs headr EU $47 Read 14 bytes of a file header 

. 

* @D0S vectors for interface to SUPERBASIC 

4 

ut_err® EQU $8CA Send an error message to channel @ 
bp_init €QU $118 Superbasic procedure initialisation 
ca_gtfp EU $114 Superbasic get float. point vector call 
2 

# Offset and other values used for SUPERBASIC interfacing 

* 

by_chbas EQU $38 Offset to Superbasic channel number ptr 
by rip &QU $59 Offset to Superbasic arith. stack ptr. 
ch_lench €QU £28 Length of each channel nuaber entry 
hash Eau $24 Masks out hash bit from name entries 

» 


* Arithmetic vectors and value specifiers for floating point / integer 
+ 


by_chrix E@U $11A Reserve arithaetic stack space 
ri_evec £QU $iiC Execute an arithmetic operaticn 
ri_int E@U #84 Truncate top of stack to integer 
ri_float EQ@U $88 Convert integer to floating point 
2 
- 
# QDOS MACRO FOR OPERATING SYSTEM TRAPS AND CALLS 
y ee a ee ee oe ee ee ee ee we ee ee ee ewe ween 
» 
ads MACRO 

NOLIST 

IFEQ \I-1 

LIST 

MOVES #\2,08 

TRAP #1 Manager Trap 

NOLIST 

ENDC 

IFEG \1-2 

LIST 

MOVEQ #\2,08 

TRAP #2 10 Subsystem trap 

NOLIST 

ENDC 

IFEQ \1-3 

LIST 

MOVES #\2,D8 

TRAP #3 10 Data transfer trap 

NOLIST 

ENDC 

IFEQ \1-4 

LIST 

TRAP $4 Use register Aé as base address 

NOLIST 

ENDC 

IFE@ \i-5 

LIST 

NGVE.W = \2,A2 Get vector address 

JSR (A2) Call the @DOS subroutine specified 

NOLIST 

ENDC 

LIST 

ENDN 
a 
t 
# INSTALL SPOOL, SPOOL_N and NUM JOBS AS EXTRA COMMANDS FROM SUPERBASIC 
$0 nn wn nn eww wn a ee ee 
5 
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# This first section of code should be executed once and once only after 
# the whole code section has been loaded into resident procedure RAN space. 
+ The QD0S call to bp_init causes the procedure parameter block whose address 
# is passed in Al ta be linked into the Superbasic Name Table. 
k 
START LEA PROCS Al Procedure definition address 
8005 vcall,bp init Initialise the new name table entry 
RTS »-» and return to Superbasic 
8 
* Now follow the name table entries for the SPOOL and NUM JOBS coamands. The 
* format for this table is given on page 6 of QDOS aanuai cection headed 
* "Interfacing to OL Superbasic" 
* 
PROCS DE 2 Two procedures only 
DC 5PO0L-# Relative start address 
DC.B 3, SPOOL’ SPOOL procedure name (ASCII) 
De SPOOQL_N-# Relative start address 
DC.B 7, SPOOL_N’ SPOOL_N procedure name (ASCII) 
DC a No more procedures to cone 
4 
DC | One function to be defined 
DC NUN_JOBS-# Relative start address 
DC.B 8, 'NUM_JOBS’ ,@ NUN_JOBS function name (ASCII) 
DC a End of definition table 
x 
Mea 
# SPOOL / SPOOL_N : GET CHANNEL NUMBERS AND SPAWN A SPL_JOB 
Eee a ee ee. ene 


ee 


Note that the new SPL_JOB that is spawned has no code space apart from its 
job identification text. This is because the code that is actually run is 
in the resident procedure RAM area of the OL, and because the code is 
re-entrant we can appear to be using several ccpies of it at the same time. 
It is only the data space used by each copy that aust be allocated each 
time during the @D0S at_cjob trap. 


On entry to SPOOL, the SUPERBASIC command processor sets up the following 
registers for us (note that Al, A3 and AS are all relative to Ad) : 


Al : Points to the base of the arithmetic stack 

A3 : Points to first parameter in the name table (each 8 bytes lono) 
AS : Points past the last parameter in the name table 

Aé : Points to the base of all SUPERBASIC work area (don’t use |) 

A7 : SUPERBASIC stack pointer (don’t use ') 


On exit, SUPERBASIC expects D@.L to contain an error code (or @). 


Firstly, push a word onto the stack that will be used to tell SPL_JOB 
whether or not file headers are to be copied. 


SPOOL NOVE.L #8,-(A7) Push flag onto stack for use later 
BRA.S DO_SPOOL 
SPOOL.N MOVE.L #1,-{A7) Push flag onto stack for use later 


be A. cn a. 2! 


D0 SPOOL SUBQ.L #805 


-_— + Ke 


Get (hopefully) the #device_a floating point parameter and store it on the 
arithmetic stack indexed by (A6,A1.L). Note the following : 


Two f.p. parameters should have been supplied, and so A3 will point to 

the first and AS will point past the second. Each entry is 9 bytes long, so 
by subtracting 8 from AS we force ca_gtfp to fetch the first floating point 
parameter only. 


Assume there are 2 parameters only 


CLR.L DL Ensure high word of Di is zero 

MOVE B(AG,AZ.L) DI Fetch the code word for parameter { 

AND #hash,D! Mask out the hash bit ... 

BEQ ERR_BP1 . error if hash is not supplied 

aDaS vcall ,ca_gtfp Get floating point #channel_a nurber 

BNE ERROR Handle any error in ca gtfp 

CMP #1,03 Was 1 floating point parameter found ? .., 
BNE ERR_BP1 . if not, perform error handling 


We have a floating point number (for #channel a) stored on the arithasetic 
stack at the moment. Convert it to integer and adjust the arith. stack ptr. 


MOVE #RI_INT,DQ 
oD0S vcall ,ri_exec 
NOVE B(AG,AL.L) DI 
ADDa #2,A1 


Specify f.p. to integer operation 
Execute arithmetic operation 

Get integer from top of arith. stack 
Adjust the stack pointer for use later 


A bit of tricky maths follows here. We have to fetch the actual 9D0S 
channel number from the address formed by the following foraula : 
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-_—_ = = — 


FE 2) 


-_ - —-— — oe 


-_- + = 


-_—-— - 


-—-_> - + 


-— = -— ee mF 
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addr = #ch_no # bytes _per_entry + base_addr_offset + SUPERBASIC_var_base 
= Di.W # @ch_lench + by_chbas{Aé) + ASL 
= Di.L + A2.L #4) Abb 
NULU #ch_lench, D1 Multiply ch_no by bytes_per_entry 
ADDA.L DL,A2 Add channel nueber offset 


MOVE.L @{AS,A2.L),-(A7) Get channel_a no. and save on stack 


Now get the second parameter @channel_b passed to us from SUPERBASIC. 
At the moment A3 points to the start Gf the first parameter and Ad 
points to the start.of the second parameter. 


MOVE.L AS,AS Set A3 to the start of parameter 2 
ADDG.L  #8,A5 Set AS to the end of parameter 2 

CLR.L Di Ensure high word of Dl is zero 

MOVE O(AS,AS.L) D1 Fetch the code word for parameter | 

AND #hash,D! Mask out the hash bit... 

BEQ ERR_BP2 »». error if hash is not supplied 

aDOS vcall ,ca_gtfp Bet superbasic channel number #b 

BNE ERRGR2 Handle any error in ca_atfp 

CHP #1,D3 Was 1 floating point parameter found ?.. 
BNE ERR_BP2 »+» if not, perform error handling 


We have a fioating point number for #channel_b on the arithmetic stack. 
Convert the number to integer and adjust the arithmetic stack pointer. 


MOVE #RI_INT,D@ Specify f.p. to integer operation 

QD0S vcall ,ri_exec Execute arithsetic operation 

MOVE B(A6,A1.L) D1 Bet integer from top of arith. stack 
ADDa #2,A1 Adjust the stack pointer for use later 


The same tricky aaths again. Fetch the actual @D0S channel nueber. The 
address calculation formula has been given already. 


MULU 4ch_lench,D! Multiply ch_no by bytes per_entry 
MOVE.L  bv_chbas{Aé) ,A2 Rase_addr_offset of channel table 
ADDA.L =D, A2 Add channel nueber offset 


MOVE.L  @{AS,A2.L),-(A7) Get channel_b no. and save on stack 


Create a new SPL_JOB entry to transfer the data for us. On exit froa 
at _cjob D1.L contains the new job’s id not the old one. Also, A@.L is left 
pointing to the job’s start address, not the base of the job area. 


MOVEG #job_id,D! Independent new job created 
MOVES #code_sp,J2 Set code space for SPiL_JOB prograa 
NOVEO #data_sp,D3 Set data space for SPL_JOB prograe 


Note that the start address for the new job is NOT the start of code space 
that will be allocated for that job. 


LEA.L SPL_JOB,AlL Set start address for SPL_JOB prograe 
8DOS trapl,at_cjob Create SPL_JOB entry 

TST.L De Did any errors occur ?... 

BNE ERRORS --- if So process the error 


Perform a “dummy” call to at_prior, not to set the job’s priority, but to 
obtain the base address of the job's control area into A@.L 


MOVE #8 ,02 Ensure the job is not activated yet 
8D0S trapi,at_prior Fetch base of job control area into AQ@ 
TST.L De Did any errors occur ?... 

BNE ERRORS -+. if so, perform error handling 


Set the SPL_JOB‘s initial registers as follows : 


A@.L : Channel_id for device_a (ie read from this one) 
A2.L : Channel_id for device_b {ie write to this one) 
D2.L : Set to 1 for SPOOL_N‘and set to @ for SPOOL 


MOVE.L ©: (A7)+, jb_afi(A@) Preset Job's A@ register to channel a 
MOVE.L {A7)+, jb_d2(A@) Preset Job's file header copy flag 


Register Ab in the job control area [ie jb_a6(A@)] will have been set 

to point to the start of the reserved job area. Although there is no code 
in the “dummy code space” to be executed, we store the job’s nage in 
standard QD0S format to allow the job to be identified using the JOBS 
command, 


MOVE.L jb ab(A@) Aa Point to Job's allocated code area 
MOVE #1402 Nuaber of bytes -1 to be loaded 
LEA ID_BLOCK,A2 Point to Job_id block 


MOVE.B (A2)+, (AQ) + Load a byte 
DBF D2,L0AD | Exit loop only if 02 = -! 
BRA.S ACTIVATE Skip around the Job_id data 

i 

ID_BLOCK DC.W B,2,8 Don’t care about bytes @ to 5 
DC.4 $4AFB Bytes 6 and 7 are @D05 flag word 
DC.W ] Nuaber of characters in job name 
DC.B Spool’ ,8 ASCII Job name + alignment byte 


Now that everything has been set up ready, activate the SPL_JOB and let 
it handle the actual data transfer. 


ACTIVATE MOVE #priority,D2 Set job priority a bit less than BASIC 
MOVES #203 Run the new job before we've finished 
800 trapl,at_activ Activate the new SPL_JOB 
TSTL Da Did any errors occur ?... 
BNE ERRORG »+» if So report errors. . 
RTS Noraal exit to SUPERBASIC 


ERROR PROCESSING FOR THE SPOOL OR SPOOL_N COMMAND 


Error has occurred in fetching the first channel nusber. Force the error 
message "bad parameter" to be displayed 


ERR BP) ©MOVER ferr_bp,Da Set "bad parameter” error code 
BRA.S ERROR Pop 1 unwanted long word off the stack 


Error has occurred in fetching the second channel number. Force the error 
message "bad parameter” to be displayed 
ERR _BP2 MOVEE ferr bp, D@ Set "bad parameter” error code 
BRA.S ERROR2 Pop 2 unwanted long words off the stack 
* 
Error has occurred with three long words on the stack to be tidied up 
4 
ERRORS MOVE.L (A7)+,A@ Scrap stack entry number 3 
+ 
Error has occurred with two long words on the stack to be tidied up 
+ 


ERROR2 MOVE.L (A7)+,A Scrap stack entry number 2 

; Error has occurred with one long word on the stack at present 

srk MOVE.L (A7)+,A@ Scrap stack entry number | 

Error has occurred and there is nothing on the stack that needs tidying up. 
ne NOP 


KILL_JOB kills off the job entry just created, because an°error has occurred 
before the job could be run. The job id {if any) is in DI.L, error aessage 
in DB.L. If at_frjob fails (ie job does not exist) ignore the error 
condition generated, because it’s possible we hadn't instalied it anyway. 


ILL_JOB MOVE.L = D@,-(A7) Save errer code on the stack 
MOVE 48,03 Generate no error message 
aDOS trapl,at_fr job Kill the job whose id is in DI.L 
MOVE.L  (A7)+,D8 Get the original error message back 
RTS Exit with error aessage to Superbasic 
















Indentor 
Colin Hunniford 


Our challenge to readers to producea_ shortest though was this one from 
file listing utility of less than 100 lines Colin Hunniford which does the job in 
prompted a number of responses. The a remarkable 18 lines. 
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10 CLS:CLS £0:9RINT \TO 14:"INDENTOR"\TO 
i4:’ Hwy 
20 INPUT £0,"SORCE (dev_filename): 


"sa$\"DEST’ (dev_filename)! ":b$:IF a$=b$ THE 


N PRINT £0,"DEST’ must be different from 
SORCE!":GO TO 20 


30 CLS £0:0PEN £3, a$:0PEN_NEW £4, b$ 
40 LET a=0 

SO INPUT £3,c% 

60 LET b=O:LET c=" "INSTR c$:LET d=c 

70 IF c$(d)=" " THEN LET d=d+1:G0 TO 70 
BO LET d$=c$(d TO) 


IF "DEFine " INSTR d#=1 OR "Repeat "INSTR dt=1 


OR "FOR " INSTR d#=1 THEN LET a=at+1:!LET b=-1 
IF "END " INSTR d$=1 OR "NEXT " 

INSTR d#=1 THEN LET a=a-1 

IF "ELSE " INSTR d#=1 OR "LOCal" 

INSTR d$=1 THEN LET b=-1 

IF LEN(d%) (6 THEN GO TO 140 

IF "IF " INSTR d$=1 AND " THEN " INSTR d& 
(LEN(d$)-5S TO) THEN LET a=atitLET b =-i 
LET t=at+b:IF t<O THEN LET t=0 

LET eS$=c$(1 TO c)&FILLS(" "| t#2) &ds 

PRINT eS:PRINT £4, ef 

IF NOT E0F (£3) THEN GO TO 50 

CLOSE £3:CLOSE £4 


3D Maze 
Simon Wallis 


QL owners need worry no longer right to top left of the maze in the shor- 
test time possible. Use the cursor keys 
Here is a 3D maze program you can to turn, numeric keys to move forward, 
play from the comfort of your own V to view the plan — up to three times 
— and Q to quit if you cannot find the 


about the closure of Hampton Court. 


armchair, 
The object is to get from bottom way out. 









100 CLS:CLS#0 
110 x1l=17:yl=29 

120 DIM a$(xl,yl) 

130 bS=FILL$(CHR$(O),y1) 

140 a$(1)=b$:a$(xl)=b$:a$(xl-1)=b$ 





150 c$=FILL$(CHR$(255) &CHR$(O),yl):c$(1 TO 2)=CH 


R$(0)&CHR$(O):c$(yl-1 TO yl)=CHR$(0) &CHRS(O) 
160 FOR n=2 TO x1-2 STEP 2 

170 a$(n)=b$ 

180 a$(n+1)=c$ 

190 NEXT n 

ae F$= tere 


X1=RND(3 TO x1):yl=RND(3 TO yl):IF a$(x1,yl) 


2CHR$ (0) THEN GO TO 210 
220 a$(x1lsyl1l)=" " 

230 PRINT ag 

240 RESTORE :FOR n=1 TO 4 


250 READ x,y:IF a$(x,y)=CHR$(255)THEN a$(x,y)="F 


"3; FS=FS$&CHRS$ (x) &CHRS(y) 

260 NEXT n 

270 DATA x1-2,y1,x1+2,y1,x1,y1-2,x1,y1+2 
280 REPeat loop 

290 IF F$=""THEN EXIT loop 

300 P=RND(1 TO LEN(F$)/2)*2-1 

310 IF P<1 THEN P=1 

320 x=CODE(F$(P)):y=CODE(F$(P+1) ) 

330 P$=F$:FS$="" 

340 IF P>1 THEN F$=P$(1 TO P-1) 


350 IF P<LEN(P$)-2 THEN F$=F$&P$(P+2 TO LEN(P$) ) 


360 b$="""' 
370 IF a$(x-2,y)=" 
380 IF a$(x,y+2)=" 
390 IF a$(x+2;,y)="" "THEN b$=b$28"'3"' 
400 IF a$(x,y-2)="" "THEN b$=b$&''4"' 
410 B=b$(RND(1 TO LEN(b$) ) ) 

420 x1l=-1l:y1=0 

430 IF B=2 THEN x1=0O:yl=1 


"THEN b$="1"' 
"THEN b$=b$&''2"' 
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440 
450 
460 
470 
480 


IF B=3 THEN x1=1:y1=0 

IF B=4 THEN x1=O:yl=-1 

a$(x,y)=" "sa$(x+xl,y+yl)=" " 
aS(x+x1+xl,ytyl+yl1l)=" " 

IF a$(x+2,y)=CHR$(255)THEN a$(x+2,y)="F"': F$= 


FS&CHRS$ (x+2) &CHR$(y) 


490 


IF a$(x-2,y)=CHR$(255)THEN a$(x-2,y)="F"": F$= 


F$&CHR$ (x-2) &2CHRS(y) 


500 


IF a$(x»,y+2)=CHR$(255)THEN a$(x,y+2)="F":F$= 


F$&CHR$(x) &CHR$(y+2) — 


$10 


IF a$(x,»y-2)=CHR$(255)THEN a$(x,y-2)="F":F$= 


FS&CHR$ (x) &€CHR$(y-2) 


520 
530 
S40 
s50 
S60 
S70 
580 
590 
600 
610 
620 
630 
640 


AT X;sy-1:PRINT" ":AT x+xl,;y+yl1-1:PRINT" " 
END REPeat loop 

xXx=x1-2: y=yl-2:a$(3,2)=" " 

d=1l1:out=0 

jumps=0:views=0 

DIM d$(4,5):FOR n=1 TO 4 

READ d$(n):NEXT n 

DATA "North","East", "South", "West" 

SCALE 300;0,0 

INK O:INK#0;0 

PAPER 7:PAPER#0O;7 

CLS:CLS#O 

CSIZE 3,:1:AT 4;,;6:FLASH 1:PRINT"'GO GO GO !!t!" 


:FLASH O 


6S0 
660 
670 
680 
690 
700 
710 
720 
730 
740 
ne 

750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 


1000 


CSIZE 2,0 
SDATE 1984,0,0,0;0,;,0 


REPeat loop: 


IF out THEN EXIT loop 

move _ 

print_ 

END REPeat loop 

CLS#0O:PRINT#0;"You are out of the maze! ":ti 
INPUT#O;"Again ? ";q$ 


IF ABS(CODE(q$)-105)=16 THEN RUN 

STOP 

DEFine PROCedure time 

time$=DATE$ 

time$=time$(17 TO 20) 

AT#0,0,28:PRINT#0;time$ 

END DEFine 

DEFine PROCedure move_ 
time: in$=INKEY$ 

IF in$=""'THEN GO TO 860 
in=CODE(in$) 

SELect ON in 

=74,106: jump 

=86,118:view 

=81,113:quit 

=192:left 

=200:right 

=48 TO 57:forward 

END SELect 

AT#0,;0;,0 

PRINT#0;"" Facing ";d$(d)!\ 

PRINT#0;x-3;"' South, ";y-2;" West. 
time 


1010 END DEFine 


1020 


1030 DEFine PROCedure jump 


1040 


IF jumps>3 THEN PRINT#0;"You've already had 


3 jumps!":PAUSE 100:RETurn 


1050 


Xx=RND(7 TO x1-2):y=RND(7 TO yl-2) 


LOGO IF astx sy) <>" "THEN GO TO 1050 


1070 


BEEP 32767,20;0;5;5;10 


1080 d=RND(1 TO 4): jumps=jumps+l1 


1090 


END DEFine 


LAO0 3 
1110 DEFine PROCedure view 


1120 


IF views>3 THEN PRINT#0;"You've already had 


3 views!":PAUSE 100:RETurn 


1130 


CLS 


1140 PRINT ag 

EL SO AT Sl SPRING Os 
1160 AT x»sy-1: 

1170 SELect ON d 

1180 =1: PRINT CHR$(190) 
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1190 =2:PRINT CHR$(189) 1930 =4: 


1200 =3:PRINT CHR$(191) 1940 LINE 295,115 TO 295,18S,205,115 TO 205;185: 

1210 =4:PRINT CHR$(188) FILE. @ 

1220 END SELect 1950 LINE 205;115 TO 230,135,295;115 TO 270,135; 

1230 views=views+1 295,185 TO 270,165,205,185 TO 230,165 

1240 FOR n=1 TO 200 1960 =S: 

1250 time:IF INKEY$=""THEN NEXT n 1970 LINE 230,135 TO 230,165,270,135 TO 270,16S: 

1260 END DEFine FItL 1 

1270 : | 1980 LINE 230,135 TO 270,165,270,135 TO 230,165 

1280 DEFine PROCedure quit 1990 END SELect 

1290 CLS 2000 END DEFine 

1300 views=0: view 26010 

1310 PRINT#O\\\"You quit." 2020 DEFine PROCedure left_(di) 

1320 STOP 2030 SELect ON di 

1330 END DEFine 2040 =O:LINE 50,0 TO SO;300 

1340 : 20S0 =1:LINE 90,30 TO 90,270 

1350 DEFine PROCedure left 2060 =2:LINE 140,60 TO 140,233 

1360 d=d-1:IF d=0O THEN d=4 2070 =3:LINE 175;95 TO 175,205 

1370 END DEFine 2080 =4:LINE 205,115 TO 205,185 

1380 : 2090 END SELect 

1390 DEFine PROCedure right 2100 END DEFine 

1400 d=d+1:IF d=5 THEN d=1 2110 : 

1410 END DEFine 2120 DEFine PROCedure right_(di) 

1420 : 2130 SELect ON di 

1430 DEFine PROCedure forward 2140 =O:LINE 450,0 TO 450;30,450,270 TO 450;300 

1440 IF in$=O THEN RETurn 2150 =1:LINE 410,30 TO 410,66;410,233 TO 410;270 

1450 x1=0:y1=0 2160 =2:LINE 360,66 TO 360,95,360,205 TO 360,233 

1460 SELect ON d 2170 =3:LINE 325,95 TO 325,115,325,185 TO 325;20 

1470 =1:x1=-1 s 

1480 =2:yl1=1 2180 =4:LINE 295;115 TO 295,135,295,165 TO 295,;1 

1490 =3:x1=1 85 

1500 =4:yl1=-1 2190 END SELect 

1510 END SELect 2200 END DEFine 

1520 FOR n=1 TO in$ 2210 : 

1530 IF a$(x+xl,y+y1)<>" "THEN 2220 DEFine PROCedure wall_(di) 

1540 PRINT#0;"Ouch! That's a wall !":PAUSE 100:R 2230 FILL 1:INK 4 

ETurn 2240 SELect ON di 

1550 ELSE 2250 =O:LINE 90,30 TO 90,270;410;30 TO 410;270 

1560 x=x+xl:y=ytyl 2260 =1:LINE 140,66 TO 140,233,;360,66 TO 360,233 

1570 END IF | 2270 =2:LINE 175,95 TO 175,205,325;,;95 TO 325,205 

1580 NEXT n 2280 =3:LINE 205,115 TO 205,185,295;115 TO 295,1 

1590 END DEFine 85 

1600 : 2290 =4:LINE 230,135 TO 230,165,270,135 TO 270;1 

1610 DEFine PROCedure print_ 65 

1620 CLS:x1=0O:y1=0 2300 END SELect 

1630 SELect ON d 2310 END DEFine 

1640 =1:x1=-1 2320 

1650 dad ein 2330 DEFine PROCedure exit_(di) 

aa Bynes 2340 wall_ di-1 

1670 =4:yl=-1 2350 FILL 1:INK 6 

1680 END capers 2360 SELect ON di 

1690 FOR n=0 TO 5 2370 =1:LINE 175,30 TO 175,205,325,30 TO 325,205 

1700 floor n:time sout=1 

1710 IF a$(x+n*xl-yl,y+n*yl+x1)=" "THEN left_ n 2380 =2:LINE 205,66 TO 205,185,295,66 TO 295,185 

P7ZOCLE aS (xenPxityiryen” yield) 4 pe eee ot 2390 =3:LINE 230,95 TO 230,165,270,95 TO 270,165 
x + ° 

1730 IF y+y1*n<3 THEN exit_ Ard Ree 2400 =4:LINE 240,115 TO 240,155,260,115 TO 260;1 

1740 IF a$(x+n*x1+x1,y+n*yl+yl)<> THEN wall_n 55 

>RETurn 2410 END SELect 

1750 NEXT n 2420 INK O 

1770 : 





1780 DEFine PROCedure floor(di) 
1790 FILL O:INK O 













1800 SELect ON di Compacter 
1810 =O: 
1820 LINE 450;0 TO 450,300,50,0 TO 50,300:FILL 1 Jason Creak 


1830 LINE 50,0 TO 90,30,450;0 TO 410;30;450; 300 

TO 410,270;50;,;300 TO 90;270 

1840 =1: 

1850 LINE 410,30 TO 410,270,90,30 TO 90;270:FILL 
1 

1860 LINE 90,30 TO 140,67,410,30 TO 360;67;410;2 

70 TO 360;233;,;90,;270 TO 140,233 

1870 =2: 

1880 LINE 360,67 TO 360,233,140,67 TO 140,233:FI 

LL. 2 


In marked contrast to the numerous THEN, LET statements, and unneces- 
space indenter programs featured sary spaces. While it will not improve 
recently, this one actually compresses the readability of your programs, 
SuperBasic files. It works by con- memory savings of up to 30 percent 
catenating lines and removing REM, are possible. 





1890 LINE 140,67 TO 175,95;360,;67 TO 325,95,;360, 1 REMark SuperBASIC Compactor 

233 TO 325,;205;140,233 TO 175,205 2 REMark vsn 2.76 

1900 =3: 3 REMark 1985 J.N.Creak 

1910 LINE 325,95 TO 325,;205,175,95 TO 175852052F1 100 set_up 

LE i 110 REPeat loop:process 

1920 LINE 175,95 TO 205,115;325,;95 TO 295;115;32 120 DEFine PROCedure set_up:LOCal a 
5,205 TO 295,185,175;205 TO 205;185 130 WINDOW#0,452;42;30;208 
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140 WINDOW#1,228,202;256,6 

150 WINDOW#2,228;,202,28;6 

160 MODE 4:FOR a=0O TO 2:PAPER#a;,0:INK#a; 7: BORDER 

#a,1,2:CSIZE#a,1,0:CLS#a 

170 END DEFine 

180 DEFine PROCedure process:LOCal s$,o$ 

190 INPUT#2,"Which source file ?"\s$\\ 

200 INPUT "Which object file ?"\o$\\ 

210 IF VERS="Js" 

220 WHEN ERRor :REPORT:BEEP 0,5,10,5,7:PRINT#0\ 
"Press any key to stop.":PAUSE:BEEP:err_off:file 
s: STOP 

230 END IF 

240 OPEN_IN#3,s$:OPEN_NEW#4,0$ 

250 comp_prog 

260 CLOSE#3:CLOSE#4 

270 PRINT#2: PRINT: BEEP 20000;40 

280 IF VER$="JS":err_off 

290 END DEFine 

300 DEFine PROCedure err_off 

310 WHEN ERRor : REPORT: STOP 

320 END DEFine 

330 DEFine FuNction letter(a$):LOCal a 

340 a=CODE(a$):SELect ON a=48 TO 57:RETurn -1:=9 

°S5,97 TO 122:RETurn 1:=65 TO 90:RETurn 2:=REMAIND 
ER :RETurn O 

350 END DEFine 

360 DEFine FuNction pro_line$(line$):LOCal char_ 
loop, pos%;:c$,sp_req%,c,find_end,p2Z% 

370 control%Z=0: line$=line$(1 TO y%-1)&line$(yZ+1 
TO)&' ‘':posZ=yZ-1 

380 REPeat char_loop 

390 pos%Z=pos%+1:IF posZ=LEN(line$):EXIT char_1loo 
p 

400 c$=line$(posZ) 

410 IF letter(c$) 

420 p2Z=posZ% 

430 REPeat find_end 

440 p2Z=p2Z+1:IF p2Z>LEN(line$):EXIT find_end 
450 IF letter(line$(p2%))=O:EXIT find_end 

460 END REPeat find_end 

470 c$=line$(pos% TO p2Z-1) 

480 sp_reqZ=1 

490 c=letter(line$(posZ) ) 

S500 SELect ON c=2:capital:=1: lower:=-1: pos%Z=p2Z- 
1 

510 ELSE 

520 c=CODE(c$) 

530 SELect ON c 


540 =34:pos%Z='"'INSTR line$(pos%+1 TO)+pos% 

550 =39:posZ=""'"INSTR line$(posZ+1 TO)+posZ 

S60 =32:c$=line$(posZ+1) 

S570 IF c$=' ':line$=line$(1 TO posZ-1)&line$(pos 
Z+1 TO): posZ=posZ-1:NEXT char_loop 

580 IF (sp_req%Z=3 AND c$ INSTR "):"=0 OR sp_reqZ 
=2 AND(c$="""""OR c$='"*) OR sp_req%Z AND letter(c 


$))=O: line$=line$(1 TO posZ-1)&line$(pos%+1 TO): 
posZ=posZ-1 

S590 =S58:IF line$(posZ%+1)=":" OR posZ=y%Z% OR posZ= 
LEN(line$)-1:line$=line$(1 TO posZ-1)&line$(posZ 
+1 TO): posZ=posZ-1 

600 END SELect 

610 ns 

620 END IF 

630 END REPeat char_loop 

640 IF yZ=LEN(line$):RETurn '' 

650 IF concat$<>'':lineg$=":"a&line$(y% TO) 

660 RETurn line$(1 TO LEN(line$)-1) 

670 END DEFine 

680 DEFine PROCedure capital:LOCal a 

690 a=in_str(c$,"/REMark/LET/THEN/GO/LIST/") 

7OO SELect ON a 

710 =1l:line$=line$(1 TO pos%Z-1-(line$(pos%Z-1)=": 
"))a&" ": posZ=LEN(line$)-1:RETurn 

720 =8:line$=line$(1 TO posZ-1)&line$(posZ+4 TO) 
:posZ=posZ-1:ns:RETurn 

730 =12:line$=line$(1 TO posZ%-1)a":"&line$(p2% T 
O):posZ=pos%Z-2:ns:RETurn 

740: =17,.202tPRINT#FO\\CS:" not valid." \"*"%2 

750 END SELect 

760 IF in_str(c$,'/SELect/IF/WHEN/REPeat/FOR/'): 
controlZ=1 

770 a=in_str(c$,space_req$) 
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780 IF a:sp_reqZ=2+(space_req$(a-1)='a') 

790 a=in_str(c$,"/DEFine/LOCal/SELect /ERRor/REPe 
at/END/RETurn/") 

800 IF a 

810 SELect ON a 

820 =1:IF line$(p2Z+1)="P":line$=line$(1 TO posZ 
)&"EFPROC"&line$(p2Z%+10 TO):ELSE :line$=line$(1 
TO posZ)&"EFFN"&line$(p2Z+9 TO) 

830 =34:line$=line$(1 TO posZ+2)&line$(p2Z%+1 TO 
pP2Z+3-(line$(p2%+1)="I")+(line$(p2Z%+1)="W") )&lin 
e$(' ‘INSTR lLline$(p2%+1 TO)+p2% TO) 

840 =REMAINDER :line$=line$(1 TO posZ+2)&line$(p 
OS%Z+LEN(c$) TO) 

850 END SELect 

860 posZ=pos%Z+' ‘INSTR line$(posZ TO)-2 

870 ELSE 

880 posZ=p2Z-1 

890 END IF 

900 END DEFine 

910 DEFine PROCedure lower:LOCal aZ,q$ 

920 IF LEN(c$)>3:IF in_str(c$(1 TO 4);,"/con_/scr 
_/mdv1/mdv2/serl1/ser2/neti/neto/flp1/flp2/par_'"') 
: POSZ=posZ%Z+LEN(c$)-1:RETurn 

930 aZ=in_str(c$,name$) 

940 IF aZ=0:aZ=LEN(name$)+5:name$=name$&anext_nofFf 
3° 7  &ecSa:" /" | 

950 q$=c_nom$(aZ):line$=line$(1 TO posZ-1)&q$ali 
ne$(p2Z% TO) :posZ=posZ%+LEN(q$)-1 

960 END DEFine 

970 DEFine FuNction next_no$:LOCal a$ 

980 IF n_noZ%>9999:PRINT#O\\"Too many identifiers 
oy 270 


990 a$=n_no%Z:n_noZ=n_noZ+1:RETurn FILL$('0O',4-LE 


N(a$) )&as 

1000 END DEFine 

1010 DEFine FuNction c_nom$(aZ) 

1020 aZ=name$(aZ-4 TO aZ-1) 

1030 IF a%<26:RETurn r_char$(aZ) 

1040 a%Z=a%Z-26:1F a%<936:RETurn r_char$(a%Z MOD 26 
)&r_char$(a%Z DIV 26) 

1050 a%=a%-936:RETurn r_char$(aZ MOD 936 MOD 26) 
@r_char$(a% MOD 936 DIV 26)&r_char$(a% DIV 936) 
1060 END DEFine 

1070 DEFine FuNction r_char$(aZ) 

1080 RETurn CHR$(97+aZ-75* (a%Z>2S) ) 

1090 END DEFine 

1100 DEFine PROCedure ns 

1110 sp_req%=0 

1120 END DEFine 

1130 DEFine PROCedure comp_prog:LOCal name$,n_no 
%,dumpZ,control%;,concat$,each_line,nxt$,y%Z, space 
_req$ 

1140 space_req$=""/q/ARC/q/ARC_R/q/CIRCLE/q/CIRCL 
E_R/a/DATA/a/RESTORE/q/ELLIPSE/a/GOSUB/a/GOTO/a/ 
IF/q/LINE/q/LINE_R/q/POINT/q/POINT_R/a/RETurn/q/ 
SCALE/a/TO/a/STEP/": name$='':n_noZ=O:concat$='': 
controlZ=o0 

1150 REPeat each_line 

1160 IF EOF(#3) 

1170 control%Z=2 


1180 ELSE 
1190 INPUT#3,nxt$:PRINT#2,nxt$ 
1200 yZ=' ‘INSTR nxt$ 


1210 IF LEN(nxt$)>13:IF nxt$(y%+1l TO yZ+7)="DEFi 
ne ":controlZ=1 

1220 IF LEN(nxt$)>yZ+S5:IF ":DATA "INSTR nxt$ OR 
in_str(nxt$(yZ+1 TO y%+5),"/WHEN /DATA /"):contr 
o1Z=1 

1230 END IF 

1240 IF concat$<>''AND control%:PRINT#4;,concat$: 
PRINT concat$:concat$='' 

1250 IF control%=2:EXIT each_line 

1260 concat$=concat$&pro_line$(nxt$) 

1270 END REPeat each_line 

1280 END DEFine 

1290 DEFine PROCedure files 

1300 CLOSE#3:CLOSE#4 

1310 IF in_str(o$(1 TO 3),"/mdv/flp/") :DELETE o$ 
1320 PRINT#0,"Files cleared." 

1330 END DEFine 

1340 DEFine FuNction in_str(a$,b$) 

1350 RETurn '/'&a$&'/' INSTR bs 

1360 END DEFine 


ROOFTWARE FILE 





Our man with the joystick, Marcus Jeffery, puts the latest QL games to the test. 
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QL Quboids 


Remember Monsters for the BBC/Elec- 
tron? You know the Dig-Dig-Dig, Fill- 
Fill-Fill one. No? Well, anyway, that is 
what QL Quboids is. There are a 
number of levels, inter-connected by a 
series of ladders. In this Sinclair game 
they are the walkways round the city; 
the introduction tells you that, because 
you would not have guessed other- 
wise. Wandering round are a bunch of 
monsters, called Nebulons, which you 
are expected to get rid of. 

The monsters do not like heights 
and if you dig through a walkway with 
your trusty pneumatic drill it is likely 
that they will fall in. Having been 
clumsy enough to fall for that, they 
show their true dexterity by grabbing 
the sides to stop their fall and they will 
pull themselves slowly out of the hole, 
which miraculously disappears behind 
them. So you have to dash up.and-bep 
them on the head to push them 
through and kill them. 

Unfortunately, if you do not do that 
they will turn into even nastier 
monsters, known as Gastroids, which 
have to be dropped through two holes. 
That is done by digging holes directly 
above each other, then dropping the 
monster through the top one. Even 
worse, they can turn into Bipods — 
three holes — or the ultimate nasties, 


56 





the Quboids, which can be killed only 
by a four-hole drop. As you progress 
through the game, the monsters 
appear anyway. 

There is one other complication. It 
seems the evil creatures emit an odour 
and you have to wear special breathing 
apparatus to survive. You have period- 
ically to replenish it by moving over an 
air cylinder, otherwise you will turn a 
funny colour and drop dead. Dashing 
about in that manner also uses a good 
deal of energy and running out of 
energy is also fatal. You can replenish it 
by collecting food which is scattered 
about the walkways. 

There is no key to allow you to filla 
hole, so careful tactics are needed to 
ensure that you do not become 
stranded without a ladder, but you can 
jump through the holes whenever you 
like. One feature I did not like is that 
the monster's movements seems to be 
entirely random. If the monster will 
home on you, even partially, it gives 
you a chance to lure it into a deep hole. 
That means that the nastier monsters 
seem continually to fall into holes 
which you have dug in the lower levels 
as part of a sequence. 

So you have to dash up and push 
them through, then re-dig the hole(s) 
for another attempt. Before long, you 
encounter oxygen problems —all part 
of the game, I suppose. On the whole, 


Hr BONUS LIVES 


it isa well-produced game. 


QL Jabber 


A long-winded, and rather contrived, 
introduction to this Sinclair game will 
tell vou of the United Solar Spice Space 


Pilot Training (Dune?) and the Disease 
Control Centre (?). It seems that you 
are some form of antibiotic and anti- 
virus drug. Well, you learn something 
new very day and the names of the nas- 
ties certainly confused me. They may 
sound familiar but I was only just about 
able to pronounce Streptococcus — 
the - weakest of the bunch — and 
Staphylococcus — only a little worse. It 
seems the deadlist of the bunch is 
Rabies, which is a rapid ‘hornet type. 


Try to imagine a two-way caterpillar- 
type game, You are in the centre and 
the bad guys, or bad organisms in 
these days of equality, move horizon- 
tally or vertically. Sitting in the centre 
of the screen, you can move only hori- 
zontally and fire vertically. Once hit, 
the bacteria turn into walls —I dont 
know why — which will make other 
bacteria turn when they hit them. 
Dont worry, you can shoot straight 
through those walls. 

Everything seems fine at first but, 
two screens later, the E. Coli appear 
and their circling movements can be 
disconcerting. All the bacteria have 
different forms of movement, ranging 
from horizontal, vertical and diagonal, 
to circling, fluttering and homing. 

Clearing a screen takes you to the 
next level, where you may not be 
allowed to shoot through walls, which 
may no longer be safe. There are 26 
levels in all but the programmers 
think you will have great difficulty even 
getting close to that figure. 

It is by no means a complex game; in 





fact, it is almost too simple. The sprite- 
type graphics are not incredibly 
speedy, but serve the purpose, and the 
game has that professional appear- 
ance, including those little touches, 
such as various clips of music, and the 
like. Nevertheless, the authors should 
take full credit for producing an origi- 
nal and addictive idea. It is that type of 
game which leaves you knowing that 
you could do better, if only A-sterilis- 
ing we will go. 
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3D Slime 


Have you ever wanted to be one of 
those little green men from outer 
space? Will a little green slime do? If so, 
read on. 3D Slime, from Datalink 
Systems, is a fairly simple game, where 
you have to flollop — I'm afraid this 
Hitch Hiker’s Guide description, as 
applied to mattresses, is the best I can 
find — through Robocity, collecting 
little purple pyramids. Ours is not to 
reason why. The important thing is that 
a number of robotic spheres are not 
too happy about the situation and will 
do their best to steamroller you. 


The saving grace'of the game is the - 


graphics. Each screen is shown in a 
pseudo-ultimate _ three-dimensional 
approach which, though not spectacu- 
lar, adds interest. In addition, the flol- 
loping of your slime has to be seen to 
be believed. I never thought I would 
be sympathetic towards a slime. 

Finally, office workers take note. If 
the boss walks in, a single button 
pauses the game and places a spread- 
sheet-looking display on to the screen. 
Is everybody going mad? 


Wanderer 

Perhaps everybody really is going mad. 
Our next offering gives that truly 3D 
image — only when wearing the spe- 
cial spectacles — as you embark on an 
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interplanetary journey, playing poker. 
Don't stop reading; this is not just a 
poker game. After a guide explaining 


how to get the best from your tinted 


shades, the intro reads: 

“It's the year 2987 and somebody is 
stealing cats. Oh, where's my poor 
pussy?” shrieks your landlady.” Well, if 





they can print it, so can we. Leaping 
aboard your solar bicycle, you soon 
reach your new space vessel and blast- 
off into the unknown. 

At that point, you are faced with a 
galactic map showing the Sphinx — 
your ultimate goal — a number of 
planets and a few black holes. It seems 
the planets became bored and have 
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organised an interplanetary poker 
game, using pasing space travellers to 
communicate; couldn’-t they think of 
anything better than that? 

It seems that the all-powerful Sphinx 
has declared that the standard monet- 


ary units is — you guessed it — the 


humble moggy. It appears that the only 
way to reach the Sphinx is if you are 
carrying five Aces — including jokers 
— or 8,000 cats, and the only method 
of getting them is to persuade the 10 
planets to give them to you. You can do 


- that by taking them cards which will 


improve their hands in exchange. The 
jokers seem to be powerful cards and 
you will find them in the black holes. 

In addition to the poker business, 
there is also 3D space combat, where 
destroying the enemy will allow you to 
absorb their energy. 

The game from Pyramide certainly 
has plenty to offer, with some form of 
arcade action through the space flight, 
strategy in the card-handling, and 
adventure as you try slowly to reach 
the Sphinx. Unfortunately, after all the 
work which has gone into the game, it 
really is not particularly brilliant. The 
poker game is not really a true poker 
game and the space flight, though very 
clever, allowing you to 3D-fly around 
objects, is not really very interesting. 

It is certainly not up to the 3D-trans- 
formation approach-on such games as 
Elite. Don't take my word for it but try 
to see the game yourself. The French 
programming ‘team obviously knows 
what it is doing and so it is a pity the 
game doesn't really work. 
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ee 2 game which uses 
the full power of the 
QL spatial effects, 
combined with fast 
animation. The 
object will leap out 
of the screen 
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PYRAMIDE 





ONLY AVAILABLE 
BY MAIL ORDER. 
ENCLOSE CHEQUE/ 
P.O. MADE supplied with the 
PAYABLE TO: ay yor 
RIO PROMOTIONS LTD. Dept QL, 28 Waverley Grove, London N3 3PX. Tel: 01-349 2764 
Come and see us at the ZX Microfair TRADE ENQUIRIES WELCOME 


Deep in the land of the Hidden Kingdoms, 
guarded by a vicious and evil dragon, 
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can be fou nd the Elixir of Life. ee MatChpOnit. ..ificicsenanceos £12.50  Hyperdrive ..............c.e. SFPGO  SHOOKG Ei incc. 5 scspaccstessevnveren 
Knight Flight ................. E1250! SHOPPE! cceickecsscsventis cores £1200 = ‘CUIBOM: Sics.tcte Svcccdei £12.50 
A 1 | [ee a eee Pera | AAG cn WWCS UL eb iricwcsconnsscevncaneectuos £1250... COSMOS 6.2 l a ncesscccsssiepsc £12.50 
Cartridge Doctor ............... UA CAEAW Uses oeccerncdtoneennecers £12.50 Super Arcadia ................... £12.50 
HIGES :.f.tai.cSvccauattdeies £1G™ =. Wangs OU MAVOC ......160%. -sadeaeeee ice eR Ry £16 
TREP AWE cole cessstascccnstes £16... Bridge Player. «....:sssasseeecesde-a5r- FAG, cGrarny Patel vis....05-.c0-oeeewtes £11 
CAV EIR caste tetsacesvetsstis bar astert StH «= BATHE REWUIA occ .sccsissscsscases BOTS” YSDGOK cols cssicsscssevsvasauasakeveiet £9.75 
Meteor Storm ................0000.. £11 3 PICHONANY: csi ccccstntacen S11. Revershs... .xccatdncdicn £10.50 
Bu SD (ante este acai Sh8 Cage occa vcconearneexe £9). s'GHOGE “csSiiccin casa £13 
j SADDGT a. VATA Nknn.oncscasyeare SRS SIOUDOIGS <.......-..cecsoensstearienses CRO) ~ ANGE ac ccccacces ences £11.50 
3 Z r IGE TOGIGE «.<..r.<ctRe tee oxss cto BO DUDS, .nnnnstsnsnsctete vce teavenaee EQ: ‘Eagle/Zapper ....2...cc5...csecessessot2 £9 
DRAGONHOLD is an animate d mieeetc IGE nice £21“ SUpGTCNAEGE «.......-ctecrsersicnrs SSO sec OLIMON Gas epee es £30 
adventure ame for the Sinclair L Super Monitor ...........0....0002. E20 SUDEGSOINE: ocsiccsissonassssseosees S20 SUPE POM. sacoeeontnececrecenecoenes £24 
And ju st 1 BOK at these features - Super Astrologer ...........0...e.. £20 Backgammon ...............0... S1OHO™ | BOW OF co. isscacccintess £8.50 
Classic Adventures ............. £8.50 Eagle & Zapper ..........0..0...... £9.50 Assembler ......:..0.::.0:..scsccecees £34 
F our-way SCROLLING map graphics ELD og Re eine oY A so > Er a £52 Pascal srvtcnrnnenenntnenenn £80 
SeuueGhery to over 250 screens! eee Wcivcet ey Sea theca ms bea orecatty eth a8 os i ae ee ea 
n ividual computer controlled WARGGO sczc515.0 cB acescorewwianses BP INOINOSIG) cosseicsssccsccsusvesousanessane £17. ~=—- (CE complete Kit ..................... £52 


animated characters that you can 
communicate with 
Extremely detailed hi-res graphics 


Paes pe reer eed 3] Leek 1015) 2 e]| 12] yc Go Ae nee: Archiver DiS@’oi25:idts.c0s.cceees00: 


QU GOMIDUNEL Ficouc sikh treccresnaieeavee creNoeeaes, Expanderam SIQK s.ccciesetlcsiaciectacnde NS? 
EXAPIGONGIN ZOO os cccscses cocnsstetcccrevorrreita- + -nonetsuss £90 Gurmiania: DISGUF wssies kis cavetesomveestsvanapasiartierateles £78 






















Both visual and text puzzles Disc IF & Single 314” GriVE .............ecsececeseeeeseeses £180 Disc IF & 314” dual drive 2.0.0.0... ccescsesesesseeee £275 
G ame variations a nd new Cc ha l | en Ps, S Centronics Printer Interface ........cesssseseseseseseeeeeee £26 —- Joystick Adaptors;. 02... .cie¢us chante cup £4.50 
edac h T i me a new g ame i S g enera ed Quickshot Il. JOYSHCK .......cdteas. cease ycccencasseoosthoonses £8 NCAGO UOVSUCK 250s. css-onnctsocsiccresneacancnecesasas £14.50 


Pro:5000 Joystick ...:::jfsceucartnteastemrrcrsinaatv..s. £15.50 Microdrive Cartridges .................c.cccscesssessssccere £1.80 
4 Microdrives in wallet ..............:..ccccsceseeseresseeseeeees £8 insider Board 1.5%... avai Ghat. eee ae £105 
LX80 Printer & Interface ..............0...:ccccceeeeeeee: £265 Fidetsott MOUSE =. sxe Gens ccstiss tassssisccanecus £85 
MANGAN SPIILLGN ci ses. pecceacsoceccaesStasonsconconsnavionees £2.30 EPROM PFOQTAIMIMGN Locccccescccesssevcesiseeds Wensvetstascss £75 
EPROM Eraser with timer ...................sccsccsreecsees £22 [XBO:RIDDON« &.: eects... ca500: seer scenes aac eonn ts £5 
UID AIS SUOFAUE WOK. cxnccvcsye-Sscconsevpeesnssossconsrneatet £3 S121 DSUD GISCEIIGS seis ct. ....cssice Bene-actstios £4 
GL Advanced User Guide BOOK -:..:3:<c.:.0....::c0eeeeNO “SOTA GADIG™ orc 2s. 2 ooce cis nsaca- cebu cocctesseytoaes 


Save game feature - you can save and 
play as many different variations as 
you like! 


Available on microdrive riietes | for 


£19.95 includin . & p. Send cheque 
or P.O. fo ad P a 


Also a large range of Disc systems, Printers, Joysticks and all the latest software releases. Phone 
for more details. Note: All joysticks need an adaptor. 
UK: Add 50p postage to orders under £5 
Europe: Deduct 10% from all software. Add £1.50 postage + 40p for each program. Hardware 
prices as above + £1.50 postage. Outside Europe: Add £5 postage. 


MPC Software 
72 Julian Road, West Bridgford, Nottingham NG2 5AN 
Telephone: (0602) 820106 


11 Bannerdale Road 
fo Sheffield S7 2DJ 


ll 2 “ji Tel: 0742 583665 


Sinclair/QL World May 1986 


MICRODRIVE 





In return for a small administration charge (per program — 
including a royalty for the author), we will copy onto blank micro- 
drives any or all of the featured programs. 

Each program will be a direct copy of the published listing, or 
an extended version of that listing where the program in ques- 
tion was too long to print in full (programs for which an abridged 
version has been published are marked with an asterisk). 

it must be stressed that we are not selling the software itself, 
nor providing any guarantee that it performs any particular func- 
tion (though we do check every program that is to appear in 
Sinclair QL World), we are merely offering a service to readers 
who wish to obtain Sinclair QL World/QL User programs on drive 
rather than by typing them in straight from the page. 

If the people listed below are wondering why they have not yet 
received their programs, it is because they forgot to send us 
their address. If you write to us at the address on this page to let 
us know where you live then we can put them in the post. 

G. H. & C. Barrett 

G. W. Hedger 

A. P. Fletcher 

D. T. & J. M. Hayward 

R. R. Taylor 

F. J. Enfield 

and anonymous of Dumbarton who sent a £12 postal order. 





HOW TO ORDER 


Listed below are programs which have appeared as listings 
inside QL World/QL User and Sinclair QL World. 

To the right of each program entry is a small box, which you 
should mark with a bold cross if you want to order that program. 

Once you have put a cross next to all the programs you wish 
to have copied onto microdrive, simply complete the rest of the 
order form and send it along with your PO/cheque AND BLANK 
FORMATTED DRIVE to: 


MICRODRIVE EXCHANGE, 
Sinclair QL World, 

79-80 Petty France, 
London SW1. 


If you wish us to supply the drive, please add an extra £2.50 for 
every drive required and mark the order form appropriately. 
Please allow 28 days for delivery. 
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EXCHANGE 











ORDER FORM 
Author Language Program Name Price Issue Size 
| Giles Todd (b) DIY Assembler £5.00 Mar/Jun 120[ | 
i Converts Assembler source into m/c object code 
i Richard Cross (AO) Mini Monitor £3.00 Oct 60/ | 
Pocket sized monitor with comprehensive facilities 
| A Didcock (B) Connect4 £1.00 Sept 15[ |] 
j Pit your wits against the QL 
I Shergold&Tose _(B) Golf £2.00 May 35[ 
| From fairway to green on 50 different courses of varying difficulty 
; Williams & Holliday (AO) Paladin £5.00 Apr 70{ | 
| The basis of our games programming series — a space invaders type game written entirely machine 
code : 
Richard Cross (MB) Sprite Animation £2.00 Apr 50[ | 


A subtle blend of machine code and SuperBasic that produces a versatile sprite designer and high 
speed animator 


t Steve Deary (B) Pacman £1.00 Mar 20/ | 
i A reasonably fast rendition of the famous arcade favourite 
Andy Carmichael (B) Family Tree £3.00 Aug 100/ | 
| Archive program and database for setting up and displaying large family trees 
James Lucy (B) Composer £3.00 Oct 50] 
; Composer and play sheet music on the QL 
| Mathew Capp (B) Miners £2.00 Aug 30( | 
A nail biting management simulation that puts you in charge of the NCB 
PJ Smith (B) DIY Adventure £1.00 Feb 60[ | 
A skeleton framework where you simply have to slot in the details to create your bespoke adventure 
R Green (B) Qthello £1.00 Aug 25[_| 
i A 3D version of the well known board game Othello for one or two players 
4 SJ Ackers (B) Touch Type £4.00 Aug 80/ | 


f Touch typing course — 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


Rob Sherratt (AO) FCOPY £4.00 Mar’86 80[ | 
| A machine code microdrive utility for turbocharged file copying 
Alan Prior (B) World Map £2.00 Mar ’86 80{ | 


A high resolution multi-coloured map of the world for geography buffs 


B = SuperBasic, AO = Assembler + Object Code (ready to run), MB = Machine Code 
é + Basic loader 


Name 
i Address 

Noofprograms ordered ss .eseseeessss Total cost £ ....2cssc000 
i Total sectors 
i (max 200 perdrive) «=§«-——seaensecneees 
Noofdrivessent = =§=-———anenesnsseses 
Noofdrivesrequired  =—ssusssesssass @ £2.50 each £ ..recccccce i 
| Plus postage — packing £ 0.75 
j Subtotal € ............. : 
Add VAT @ 15% £ ccscsesssesss | 
‘ TOTAL TOBESENT £ .....s.0:00 | 
i 


Please copy onto microdrive the programs above which | have indicated with 

I a cross. | enclose a cheque/PO to the value of £ .............. (made payable to 

| QL World). | understand that Sinclair QL World only undertakes to SUPPLY | 

| these programs (copied onto microdrive) and accepts no liability for their 
operation as defined by the author. Neither can Sinclair QL World supply " 

additional information about any of the listings other than that originally 
printed 
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INSTANT 


ACCESS 


A>Line Computer Systems 
0533 778724 

4-way mains filter/adapter 
Action Computer Supplies 
01 903 3921 

Mains spike eliminator 
Anglo Services Ltd 

0705 671421 

QL Eprom Programmer 








Cambridge Microelectronics Ltd 
0223 314814 

Q-PROM Eprom Programmer 
Cambridge Systems Technology 
0223 323302 

Care Electronics 

0923 777155 

Philips and other monochrome monitors 
Commpak Data 

0792 473697 

Cofnputer Supplies 

146 Church Road, Boston, Lincs 
Joysticks 

Compware 

0270 582301 

Disk drives, memory, monitors etc. 
CST 

0438 352150 

Data Distributors Ltd 

0990 28921 

Kaga, Sinclair Vision 

Eidersoft 

0708 851099 

QL Mouse 

Eprom Services 

0532 667183 

Tony Firshman Services 

01 267 3887 : 

Mains Spike Filter 


4 Systems 

68 Foxwood Close, Feltham, Middx 
Hardware & software 
Management Science Ltd 

17 West Hill, London SW18 

QL case 

Microworld 

0293 545630/0273 6711863 

Kaga, Epson, Smith Corona, Microvitec, 
Philips, Vision 

Miracle Systems Ltd 

0272 603871 

Modem House 

0392 69295 

Opus Supplies Ltd 

Redhill 65080 
JVC 

PCML Ltd 

0372 67282/68631 

QL+ RAM cards 

Power International 

0705 756715 

Mains spike eliminator 
Printerland 

0484 514105/687875 

Epson, Brother, Kaga, Canon, Juki 
Rubicon 

0742 583665 
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Q-Links 

0436 6660 

Cables & accessories 

Silicon Express 

0533 374917 

Sinclair Research 

0276 685311 

Slave Software 

050 846 8866 

Q-Disc 

SMC Supplies 

01 441 1282 

Joystick adaptor, Centronics & Epson Serial 
Spectrotek 

0669 20565 

QL repair service 

Strong Computer Systems 

0267 231246 

Brother, Shinwa, Epson, Kaga, Mannesman 
Tally, Canon, Daisystep, Smith Corona, 
Microvitec, Philips 

Tandata 

06845 68421 

(OEL) 

Technology Research Ltd 

0784 63547 

Transform Ltd 


985.283 4783 


QL dust cover, microdrive storage box, 
RS232 lead 

Twickenham Computer Centre 

01 891 4991 

Kaga, Ensign, Canon 

Viglen Computers Supplies 

01 843 9903 

Voltmace Ltd 

Park Drive, Baldock, Herts 

Printer stand 


Accountancy Software 
Sinclair Research 

QL Cash Trader 

Adder 

0223 277050 

Q-Doctor, Assembler 
Aleph (Finland) 

358 67 77408 
QL-Numerical, QL/OR 


Bridgebrook Intek 

45 Burleigh Avenue, Wallington, Surrey 
Bank Manager, Diary Manager, Thought 
Manager 

Champagne Computers 
Amsterdam 020 149130 

QL boek, DR Q Leap 

Co-op Soft Ltd 

0272 22223 

Civil/Structural Engineering 
Compugem Ltd 

01 731 7948 

Master Blaster 

Computer One 

0223 862616 

Pascal, Forth, Assembler, Typing Tutor, 
Monitor 

CP Software 

10 Alexandra Road, Harrogate 

Bridge Player 

DA Bandoo 

81 Mount Pleasant, Wembley 
Assembler, Screen Editor 

Data Management 

0904 760351 

SBUTIL, Mbackup, Terminal, Chargen, 
SBextras, FM 


DataGEN 

0989 67469 

Packages for Solicitors, Accountants, Video 
Libraries, Double Glazing Sales & 
Miscellaneous Credit Control. 

Digital Precision 

01 527 5493 

QL Super Sprite Generator, Games Designer, 
Monitor + Dissassembler, QL Super 
Backgammon 

Eidersoft 

0708 851099 

QL Art, Zapper, QSPell, Archiver, BY II & III, 
Citadel, Spook, ICE, Integ Accounts 
English Software 

061 835 1358 

QL Hyperdrive 

Equate 

2 Ffordd Denwyn, Penyffordd, Chester 
Solar Invaders, Wall Breaker, Draughts, 
Mind Your Path, Statistical Averages, 
Calendar 

Flite Software Ltd 

01 353 7423023 

Equate (maths package) 

GST Computer Systems 

0954 81991 

QL Assembler, 68K/OS, OC C Compiler, 
Macro Assembler 

Hisoft 

0582 696421 

MonQL 


Israel Software Research 

41 Kfar Chabad, ISRAEL 60978 
Matzah Ball Game 

J&D Software 

3 Alfred Road, Lowton, Warrington 
Leisure Genius 

01 935 4622 

QL Scrabble 


Metacomco 

0272 428781 

Assembler, BCPL, Lisp 

Micro Processor Engineering Ltd 
21 Hanley Road, Southwater, Horsham, E 
Sussex 

QL Terminator Emulator 

MicroAPL 

01 622 0395 

Microdeal 

0726 68020 

Havoc, Frogger, Cuthbert 
Micrologic Consultants Ltd 

57 Station Road 

MPC Software 

0602 820106 

Most popular games 


New Horizon Software 

Fourwinds, 30 Cwm Lane, Rogerstone, 
Gwent 

Pacman, QBERT, Gold + others 


Paddy Software 

0726 832718 

Educational Programs 

PCS 

8 Oak Grove Way, Bridgwater, Somerset 
PCS Utilities 

Peak Electronics 

32 Clifton Avenue, Hartlepool, Cleveland 
QL Colour Quest _ 

Portfolio Software 

PO Box No 15, London SW11 

Positron Computing 

0554 759624 

Hi-res screen dump 


Printerland 

0484 513105/687875 

Psion Chess, Metacomco Assembler 
Prospero Software 

01 741 8531 

Pascal, Fortran-77 

Psientific Software 

(482 649187 

Keydefine, Q-Calc Calculator, Real Windows 
Psion 

01 723 9408/0553 

Quill, Abacus, Easel, Archive, Psion Chess 
QCode 

42 Swinburne Road, Abingdon, Oxon 
Terminal Emulation, 68000 Assembler/ 
Editor 

Qjump 

Sinclair Research 

QL Monitor, QL Toolkit 

QSoft 

01 499 7417 

Agenda 

Quest 

(4215 66488 

Business Accounts 

S&B Software 

20 St Nicholas Street, Diss, Norfolk 
Fantasia Adventure 

Saltgrade Software 

31 Royal Terrace, Edinburgh EH7 

File Manager, File Editor 

Slave Software 

050 846 8866 

Arable Farmer Software 

Strong Computer Systems 

0267 231246 

Super Plant Software 

097 423 223 

Plant & gardening software 

Swansoft 

164 Vicarage Road, Morriston, Swansea 
Space Trek 

Talent Computer Systems 

041 552 2128 

SKUL, WEST, GraphicQL 

TDI Software Ltd 

0272 742796 

USCD Pascal, USCD Fortran 77, Advanced 
Development Toolkit, USCD P-system, USCD 
Prolog 


TR Computer Systems 
093 924 621 
QL Payroll 
Tropic Software 
09274 27497 
Bongolia Escape 
WD Software 
0534 81392 
Hilltop, St Marys, Jersey 
WD Morse Tutor 

BOOKS 
Adder Hutchinson 
0223 277050 01 240 3411 
Century McGraw Hill 
01 240 3411 0628 23431 
Collins Melbourne House 
01 493 7070 01 940 6064 
Duckworth MicroPress 
01 485 3484 0892 39606 
Ellis Horwood Ltd Prentice Hall 
0284 789942 0442 58531 
Granada Sunshine 
01 493 7070 01 437 4343 
Harper & Row 
01 836 4635 
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CLARK HOUSE, HAXBY, 
YORK YO3 8HU 
Tel: (0904) 768853 














Tel:- 


OPD/QL FILE INTERCHANGE 


Gives your QL the ability to read and write 
microdrive cartridges in the format used by 
the ICL OPD and Merlin TONTO. Allows easy 
transfer of XCHANGE files and SuperBasic 
programs between the OPD and QL. 


Available for £15 from: D. J. WALKER, 22 
‘Kimptons Mead, Potters Bar, Herts EN6 
3HZ or send SAE for full details. 















Prices: 


errr reer eee 


ee tree reer eee 


Dot matrix Quill drafts and QL program listings : 12p/page. Please add 45p post and handling charge for orders 


under £3. 


cartridges, clearly labelled. 


* monthly newsletter (36/40 pages) 
* free advice 


* tutors (Archive etc.) 
* Massive software library (mostly free) 
* supports for local groups 

* printer hotline 


* workshops 


Further details from Brian Pain, 24 Oxford St, Stony Strat- 
ford, Mitton Keynes, MK11 1JU Tel: (0908) 564271 











s 


KEY BOARD? _25.. £17.00 
MICRODRIVE ....... £37.50 
OT assarepecareuunss £30.00 


Inclusive of VAT, p&p & insurance. 
Post your poorly QL or ring for quote. 





We are a Software House based here in the UK 
as Well as in the USA. We will pay excellent 
royalties for quality software written for the QL. 


Contact us immediately and let us make you 
= Your bestdeal. 


Gryphon Software Systems Ltd 

P.O. Box255 

Bridgend, Mid. Glamorgan CF32 OYE. 
(0656) 744679 


QL BUT NO PRINTER? 
We print your Quill documents on top quality paper (100 gsm) using daisy wheel printers with carbon ribbon. 


Pht err rete r eer eer ree 


Send for full details or QL microdrive cartridges with clear instructions to: 
DATA PRINTING SERVICES 
25, Seymour Road, Bath, BA1 6DY 


Please note: sh <tr in keeping with good software practice, you send only backed-up microdrive 


REVISION on the QL by PADDY SOFTWARE 


Q REVision — the structured, clear & concise data is independent of Q REV. Hence, 
subjects can be used interchangeably. Purchase Q REV once with the 1st subject — buy 
just data thereafter 


Subjects at ‘O’ Level: 
Q PHYS, Q CHEM — both cover most of all syllabuses. 


Q HIST — Gladstone, Disraeli, Eastern Question 1874-8, Liberals 1906-14, Salisbury, 
Parliamentary Reform, Clash with the Lords, Women & the Vote, Trade Unions, WWI (West- 
ern Front, Causes, at Sea, against Turkey, at Home). 

Q REV & ist Subject — £12 Additional Subjects £7 
Q VERB — tests 40 French Verbs — regular, irregular, reflexive. Especially written line editor 
allows accents to be added/changed/removed visibly as you type. Verbs, tenses & persons 
can be selected by the user or generated randomly. 

Q VERB is separate from Q REV; on its own — £8 
Prices include p&p, VAT & full instructions - Overseas orders £1 extra 


Phone 0726 83 2718 or send SAE for details to: 
PADDY SOFTWARE, Paradise Cottage, Golant, Fowey, Cornwall PL23 1LH. 


DS 





QL REPAIRS 












Overseas queries welcome. 













QL POOLSWINNER VERSION 2.0 
The ultimate pools prediction program 


* IMPROVED MASSIVE DATABASE Poolswinner is a sophisticated pools 
prediction aid. It comes complete with a large database with over 35000 
pla since 1969. All English and Scottish team names are in the 

atal 


* FORECASTS score draws and no score draws with built in perm generator 
— mark your coupon direct from screen. 


* SUCCESSFUL We exes that POOLSWINNER performs considerably 
better than chance 


% UNIQUE The prediction formulae calculates the actual efficiency of every 
team as the results are entered in with speed — but no tedious typing. We 
have yet to see another program on any computer that uses this method. 

ONLY £14.99 rs microdrive cartridge. 
SAME DAY DESPATCH from:- 
TECHSOFT, 24 Wharncliffe Sewt, Barnsiey, South Yorkshire S70 68P. 
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LETTER QUALITY OUTPUT 
FROM A DOT MATRIX PRINTER 


INK-WELL. A font editor and print utility for the QL. 
Works with all Epson compatible printers. 16 x 16 font 
designer. Comes with manual and 8 fonts. Prints with 
proportional or equal spacing. Works with QUILL and 
other text editors. 













£9.95 inc p&p. Send cheque/PO to PALANTIR 
PRODUCTS, 60 St. Lukes Rd, Bedminster, Bristol 






















Your Complete Sinclair Stockist 


Hardware, Software, Peripherals, 


Printers, Books, Magazines, Accessories 
P.O. Box 5607 e Glendale, AZ 85312-5607 U.S.A. 
1-602-978-2902 e Telex (via WUI): 6501267701 
DEALER INQUIRIES WELCOME 
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COMPUTER CLEANERS 


STOP LOCK- UPS AND DATA CORRUPTION 
(due to mains inteference) 
DO YOU GET LOCK-UPS? 
DOES YOUR DATA GET CORRUPTED? 
If this is due to mains interference then our plugs may be the answer 


As well as cutting high voltage spikes they smooth the cut spikes and filter RF 
interference from 1 to 30 MHZ (30db) and up to 130 MHz. 


Some customer comments: 

‘With the cleaner ... (locking up) ... is no problem now” — Electrical engineer. 
.. these com puter cleaners work” — — Computer user group. 
. the device is the answer ... (loading problems)” — BBC owner. 

«ook -ups are cured” — Golf Club QL. 

“It seems to work fine. No lockups yet” — for use in Papua New Guinea. 

“Thank you for Unbelievably prompt delivery” — Concrete manufacturer. 

“| shall recommend your product ...” — Bedford customer. 


ADAPTOR -— 1 three pin socket 
TRAILING 4-WAY SOCKET 


Simply plug either in — no wiring required. 
TONY FIRSHMAN SERVICES 
43 Rhyl Street, London NW5 3HB. 01-267 3887 


£14 inclusive 
£24 inclusive 


TOUCH TYPIST TYPING TUTOR for the Sinclair QL 


Features: 200 lessons, graphical output of results, machine code interactive keyboard, PULL DOWN menus, 
SPEED and ACCURACY targets, adustable to 90 wpm and 100% accuracy. 


Supplied on microdrive in 4 cartridge wallet 
ONLY £11.95 
Fast delivery — send cheque or PO made payable to: 


SECTOR SOFTWARE, 25 Cheetham Meadow, Moss Side, 
Leyland, Lancs PR5 3UB Telephone: (0772) 454328 















KEY SOFTWARE 


FLIGHT NAVIGATION — Fly IFR with VOR, ADF, 
ILS and Track Plotting. Includes separate 
MORSE package £9.95 
SHAPES COLOURS & NUMBERS -— with tunes 
for children 3 to 8 £6.95 


Cheques/P0 to: 

Key Software, The Nest, Durley Brook 
Road, Southampton S03 2AR 

Telephone 695182 


Q-PROM £69.95 
EPROM PROGRAMMER 
Resident s’ware. CHECK, READ, FAST BLOW, 
VERIFY, 2764/128 
Add’! EPROM for 27256 £14.95. Q-CART EPROM 
reader £5.95, Demo EPROM £4.95, EPROM eraser 
£22.95, RS232C programmer 2716-512 £149.95. 
All prices + VAT 
CAMEL PRODUCTS 
One Milton Road, Cambridge CB4 1UY 
Tel: (0223) 314814 Telex: 81574 CML 














FURNITURE Micro_Rack 








DESIGN/MANUFACTURE Cartridge Tidying Rack 
with the QL Fits on the back edge of your QL or Spectrum Plus/ 
Our design and blac pate for He 128 Keyboard and takes up to 16 cartridges - 
shelves and cupboards which is in professional use ici 
here in Finland is now available on the QL. Suitable eave ee ae Coady Oia. 
for the fitted furniture manufacturer or handyman. i 
(Please specify which). Write to: £4.95 inc. p&p from 
INTERPIIRI, 44500 VIITASAARI DRK Products Ltd 
’ ’ Bar One, Pipers Lane, Markyate, St. Albans, Herts 





FINLAND. AL3 80F 






QL ‘C’ PROGRAMMERS 
Why bother wrestling with Qdos when we've done if for you? 

A Comprehensive Library of Qdos Routines for use with the Metacomco ‘C’ system. Including: DATE/SDATE/PAPER/INK/ 
WINDOW/BORDER/CURSORON/CURSOROFF/SCROLL/PAN and loads more! 

Easy to use: ie border(fgetchid(stdout),2,2), link with the library and you've a 2 pixel border! Supplied with full 
documentation. 

Only £8.00 on UNPROTECTED microdrive cartridge. 
N. ALEXANDER, 53 Allen Road, Wolverhampton, West Midlands 


CLASSIFIED 
RING 01-222 9090 


ADs 








QL BACKUP v 3.00 


MDV BACKUP & UTIL, READ & FORMAT WITH PASSWORD 
No. INVIS FILES. SECTOR REPORT. FILE LEN READER. 
PROTECT YOUR OWN PROGS. BACK EPROM > MDV, eg 
use 2 EPROMS TOGETHER. “FANCY” WINDOW ED. £6.50 
inc P&P to STEVE JONES 93 FOXBOURNE RD LONDON 
SW17 8EN (ZITASOFT). 
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lf you are starting your own small business, advertise in Micro Ads for as little as £15.00 (inc. VAT) for the best 
way to reach QL owners and potential buyers. All you have to do is fill in the coupon below including your 
name, address and telephone number and send to: SINCLAIR QL WORLD, 79-80 Petty France, London 


SW1H 9ED. 
Maximum 30 words. 


Display advertisers should provide 
separate copy and preferably reserve 
space by phone (01-222 9090) 


Method of Payment 


NAME Please include initials) 


Cheques etc. should be made payable 
to Focus Investments Ltd., and crossed. 
| enclose herewith cheque/PO for 


fal’) | DS a ae oe a 


Your advert will appear in the earliest possible edition. 











PROFESSIONAL PROGRAMS FOR BUSINESS USERS OF 


SINCLAIR QL 

PROJECT MANAGEMENT PROGRAM - Critical Path Method based program providing the User Project Man- 
agement Tools for Time Study, Cost Study, Project Feasibility, Cash Flow, Profit/Loss Evaluation, Bar Chart, 
Manpower Utilisation, Progress Payment Computations. 
3D SPACE TRUSSES - Statical Analysis Program computing Member Forces, Support Reactions, Deflections 
under Multiple Loadings, Superpositions of Loadings to evaluate unfavourable loading conditions. 
2D RIGID FRAMES or TRUSSES - Statical Analysis Program computing the same magnitudes as for 3D but 
for 2D Frames of flexural Members or for 2D Trusses. 

Please write for free information: 


SOFTWARE Atelier, POB 148/80002 Karakoy, Istanbul — TURKEY 


SHADOW GAMES 


has moved to larger premises! Our comprehensive range of top-sel- 
ling games are available through the post or from selected stockists. 
At £12.95 each: AREA RADAR CONTROLLER, SPACE PARANOIDS, 
NIGHT NURSE, BLAST BUGGY, QUAZIMODO. At £14.95, the two- 
game, action-packed: STAR GUARD and GALACTIC INVADERS. At 
£14.95, for a limited time only, the incomparable: PAINT MASTER. 
New titles will soon be announced. WATCH THIS SPACE! 
Good programmers are always in demand. Let us publish your game 
or utility. Write for details. 


SHADOW GAMES, 1/2 The Cottages, 
Maidenhatch, Tidmarsh, nr Reading, 
Berks RG8 8HP 


ARCHIVE NOT FAST ENOUGH? 
NOT ENOUGH CAPACITY? 


Using the C programming language and BTree techniques | can 
convert your Archive applications into stand-alone programs 
that run much faster, with virtually no limitation on the number 
of records (files up to the size of the storage medium). 
Demonstration programs available on disk or Microdrive. 


L. F. HELLER, 
65 Flanders Mansions, Flanders Road 
London W4 1NF Tel: 01 994 7976 















TURN YOUR INVENTIONS INTO CASH 


Micro Peripherals Ltd is one of the world’s most successful peripheral distributors. Within our expansion programme we 
have our own design team and production facilities. We need more products to meet the demands of customers throughout 
the world. If you have designed, or have ideas for an exciting hardware add-pon for Amstrad, Atari, Commodore or Sinclair 
computers, we would like to hear from you. We are ready to buy good ideas for cash/royalties and maybe even offer you a 
full time job to help you develop your ideas further. So why not call/write to me now: 


Gordon McDowell — Export Sales Director 
Micro Peripherals Ltd, 


Unit 3 INTEC, Wade Road, Basingstoke RG24 ONE 
Telephone: (0256) 473232 (32 lines) Telex: 859669 MICROP G 
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ABC ELEKTRONIC 
BYTE BACK 

CARE ELECTRONICS 
CHROMAGRAPHICA 
COMPWARE 
DATALINK 

DIGITAL PRECISION 
D. S. ENTERPRISES 
EIDERSOFT 
FARMINTEL 

4 SYSTEMS 
LEISURE GENIUS 
METACOMCO 
MICRO ANVIKA 
MICRASOFT 
MIRACLE SYSTEMS 
MPC SOFTWARE 
PYRAMIDE 


RUBICORN 

SILICON EXPRESS 

STRONG COMPUTER SYSTEMS 
TALENT 
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STRONG COMPUTER SYSTEMS 


BRYN COTTAGE, PENIEL, CARMARTHEN, DYFED SA32 7DJ 
TELEPHONE: 0267 231246 


FULLY TESTED QL COMPUTER £199 
WITH VERSION 2.3 SOFTWARE 


PRINTER PRICES INCLUDE MIRACLE SYSTEM INTERFACE 


SEIKOSHA SP1000A OR SINCLAIR BADGED SERIAL .........0.cccceceeeeeeeeeseeee £229 
MINING ooo erase cre abs scien sacs sustain dveadectiagetatceecaeeeecmenceen ane £249 
PA PAO Ee RO ee eRe o sn UH sili tcdssedlvacsavianaascacdteuot ie eaten £419 
GUE PADUA IAAL ad eH eto ooo ecvessovs cota zeonacsvenceceadeacunessansvetintsansisi@ee £219 
Miracle Systems Parallel Interface ................c.cccccccscssssssscssccsccecceccecceeseees £20 
STE) GD 0 (EES SC, ne £10 
2000 Sheets Fanfold Paper (Supplied with printer) .........0.cccccceeeseeeees £16 
ACCESSORIES 

4 Microdrive Cartridges .............. £6, WanSfONMiiBOX «58 oSeccssesssctieces £5 
10 Cartridges with Transform Box £23 

10:DS/DB 5.25” DISKS 4 cic: cccscenee £23 

RIBBONS 

Brother M1009 .................00 £5.50 MT80 or Shinwa ..................... £6.00 
QUGRND Ae cries ccorntvaeciss £6.00 SP1000A (SINCLAIR) ............... £7.50 
WAAL: Bic, Siete cer ecstocanttictecsnee £8.00 


MONITORS (CABLES INCLUDED 


MIGFOVITEG CUD: T459/ DOS GOlG Uh rs ccsesesvcalassics <caccoveusesesesdecsocecvesseteltacseteeay. £254 
Microvitec Cub 1451/DQT3 with Swivel Stand .........0..ccc cece eeeeeeereeeees £274 
Swivel SANG FOr IG ROVILGE Soa seve ccosss re arerain oo chsescocaseavscceeedsveseeesessees £25 
Philips V7001 18MHz Green (RECOMMENDED FOR THE QL) ..............0.000000, £92 
RP Se £36 


* Provides four protected mains sockets with plug 

* Avoid crashes and damage to the QL’s components 
* 30db suppression 1MHz to 30MHz 

* 130 joules spike suppression 


MICRACLE SYSTEMS MODAPTOR ooo... cece ceeeeeceeseeeeseeeeeees £39 
* Link your QL to any modem with an RS232C socket 
*  Prestel and Bulletin Board software included 


SURESHOT SUPREME JOYSTICK 2000 ceeeeneeteeeneees £22 
MICROSTICK JOYSTICK WITH ADAPTOR 0.00.0... eceeeeeseseseeseeeeees £16 
ORL: FOV STIR REAP TOG oes sccsss cassis esecsceentesehacetiinge naicenean ie essence £5 


* * BUDGET RAM & DISK UPGRADES x « 


NEW SUPER Q-BOARD BY SANDY JUST £249 
* * 512K RAM ** PARALLEL PRINTER PORT ** DISC INTERFACE «x 
ALL CONTAINED ON STANDARD QL DISK CONTROLLER UNIT 
RAM-DISK PRINTER BUFFER AND MUCH MORE ON EPROM 
CUMANA DUAL DRIVE + SUPER Q-BOARD £449 
MIRACLE SYSTEMS 512K EXPANDERAM £119 


INTERNAL D.I.Y. 512K RAM BOARD £109 


INTERNAL 512K RAM FITTED BY US £136 


SINGLE 3.5” DISK DRIVE + INTERFACE £209 
CUMANA 3.5” DUAL DRIVE + INTERFACE £299 
CUMANA DUAL DRIVE + INTERFACE + EXPANDERAM OR INTERNAL £409 


CLEANING KIT IN CARRYING CASE £27 
x DISK HEAD CLEANER FOR 20 CLEANS 
x ANTI-STATIC MONITOR SPRAY 

x KEYBOARD CLEANING SOLUTION 


SOFTWARE 

LANGUAGES BUSINESS 
METACOMCO ASSEMBLER ......... £29 TRSYSTEMS PAYROLL .............. £63 
METACOMCO BCPL ................044. £49 DECISION MAKER ..................... £35 
METACOMEO. ISPs... .ccissvassoncecees £49 PROJECT PLANNER .................... £35 
METACOMCO PASCAL ................ £69 ‘ENTREPENEUR..22.2...cisia.t.c.0 £35 
METACOMCO GC) Scssesssccassesensevenes £79 QLHOME FINANCE (BUZZ) ......... £22 
DIGITAL BASIC COMPILER .......... EGS TYPING TUTOR cittccccctstecexccecevesies £20 
DIGITAL FORTH + REVERS ....... £24 EIDERSOFT ARCHIVER ................ £17 
QMON MONITOR/DEBUGGER ...... £18 —EIDERSOFT QSPELL (CART) ........ £20 
TALENT CARTRIDGE DOCTOR ..... £13  EIDERSOFT QSPELL (DISK) ......... £23 

QL SWITCH MULTI TASK ............ £15 

OL. BRIDGE PLAYER 2° <.:cscsecsc.0s: £18 
TONY TEBBY’S NEW SUPERTOOLKIT I] ON EPROM uuu... .cececccccsecceseeenenees £34 
SESS EIN CS SION ets Bethe Soret recess csexcveneevediedivecsasmessaredleecdsseerd exit teas £10 
EIDE seRN GE: AUIS” 55.00 sescasnoncecteune: dea Soect vagus exhessaressenssceseentel pa raathieeess £13 
Eta bet AU GINONCE: sc ccatecscecace.scu Ss ssexesscoerderPdpUeattnes tess iount asus savdvasvinatiicsisen £15 
EIDERSOF TIGER EPROM ON!ITS:OWIN o.oo Le tecndecnenesal £24 
EIDERSOFT ICE EPROM WITH SOFTWARE COMPENDIUN .................:0ccecseees £59 


10 QUALITY DS/DD 3.5 DISKS IN LIBRARY CASE £34 
LOCKUP STORAGE BOX FOR FORTY 3.5” DISKS £14 


LEISURE 

TALENT ZL cssered ce SR £13  MICRODEAL HOPPER ................. £12 
TAGENT WESTisicedescttiscccens. £13. MICRODEAL CUTHBERT/SPACE .. £12 
TALENT GRAPHIOL: 5s scciveceedesoace £16 MICRODEAL CRAZY PAINTER ..... £11 
OL BAIN Mes ste sora? 2088 Cisse. £24 MICRODEAL FLIGHT SIMULATOR £16 
ZAPPER WITH EAGLE ................. £9 MICRODEAL LANDS OF HAVOC .. £16 
QL SPRITE GENERATOR ............. E20 BUBEVURNG 5. scescssccssecoces tovsteaeste £10 
QL SUPERBACKGAMMON ........... £12° MATCH POINT .............<seceesserene% £13 
PSION CRESS ecicsructstincratessronone A igs 111 ig aa) 3 i £15 
HV PODRIVE: desccvccitercesssecdsvicves ons £13 QLSUPER ARCADIA .................... £13 
DIGITAL REVERS! ...f.28.cscstceees ir Orn Pearle wertas eric eslesns £10 
STEVE DAVIS SNOOKER ............. £13 DIGITAL ASTROLOGER ............... £23 
TALENT COSMOS: i ..cccassssnersevee. £13 MASTER BLASTER .............00.. £9 
GE CAVERING | ccstcvsnsuist deat B12 el BOUND ER i cicstesesctescesscicissssses £10 
SEIERRIVIN, ee ceva ce-dox cats Brersaeraguietee) £18 QLMETEOR STORM ........0000... £11 
QLIFIGTIONARY scscscssdsssssesssnapesss STS) - BUD sie ceercrect irene: £10 
CITAD BED, i oscSisetitiansncatsevasSenceavare EQ. . SCRAB BLE nscsccsccesensviesseeesessotse £13 
IGEN FLAP We feces evety. ostepsnces As DS) || a i ,, Se £12 
ZAPPER with EAGLE ............ £9: QSAR BER ox. eectienercBeceicccs £10 
NEMESIS: Bessiendbecssdeiadsielesasestee £12 


* ALL PRICES INCLUDE VAT AND NEXT DAY DELIVERY BY INTERLINK x* 


* ORFIRST CLASS POST * 
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